+ Reply to Thread
Results 1 to 4 of 4

Memory

Hybrid View

  1. #1
    Forum Contributor
    Join Date
    03-09-2007
    Location
    Australia
    MS-Off Ver
    Office 10
    Posts
    371

    Memory

    Hello,

    I have a simple spreadsheet with 2 sheets.
    Sheet one is used for data input and sheet 2 [linked] provides 7 reports.
    At the moment I input the data into sheet 1 and go to sheet to print the reports.
    I have set each report up with a page number so when I print I go - Print page 2 etc.
    Is there a way I can set up in sheet one formular that that I can print individually the reports instead of doing what I am at the moment.

    In otherwords if I want to only print report 2 what would be required in sheet 1

    Thanks in advance

    Barry

  2. #2
    Valued Forum Contributor mudraker's Avatar
    Join Date
    11-10-2003
    Location
    Melbourne, Australia
    Posts
    3,983
    You would need something like a worksheet change macro.
    The macro would run when you change a value in a set cell

    example
    you set the macro up to print when the value in A1 is updated.
    The macro prints sheet 2 page number based on number in A1

    If the above suggestion is suitable try the listed macro

    To install macro to correct location

    Copy this macro
    GoTo Excel
    Select sheet this is to appy to
    Right Click on Sheet Name Tab > select View Code
    Past macro into the Worksheet Module displayed

    Change red A1 as required
    Change Blue Sheet2 as required
    Private Sub Worksheet_Change(ByVal Target As Range)
       Dim Rng As Range
    
       For Each Rng In Target
          If Not Application.Intersect(Rng, Range("a1")) Is Nothing Then
             Application.EnableEvents = False
             Sheets("sheet2").PrintOut From:=Rng.Value, To:=Rng.Value, Copies:=1, Collate:=True
          End If
       Next Rng
       Application.EnableEvents = True
    End Sub
    Please Read Forum Rules Before Posting
    Wrap VBA code by selecting the code and clicking the # icon or Read This
    How To Cross Post politely

    Top Excel links for beginners to Experts

    If you are pleased with a member's answer then use the Scales icon to rate it
    If my reply has assisted or failed to assist you I welcome your Feedback.

  3. #3
    Forum Contributor
    Join Date
    03-09-2007
    Location
    Australia
    MS-Off Ver
    Office 10
    Posts
    371
    Not sure If I understand what you are suggesting.
    Is it posible for me to send the sheets to you

    regards

    Barry

  4. #4
    Valued Forum Contributor mudraker's Avatar
    Join Date
    11-10-2003
    Location
    Melbourne, Australia
    Posts
    3,983
    If the book is to big to post here post on a site like rapidshare.com then post the link here so that i can download it.

    Also make sure you include details of what cell you want to enter the sheet number in to print the report

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1