Results 1 to 5 of 5
  1. #1
    Star Lounger
    Join Date
    May 2004
    Location
    Asheville, North Carolina, USA
    Posts
    65
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Close Button (2000)

    Hello,
    I have a summary sheet that has hyperlinks to other sheets. I want to create a "button" on the "other" sheets that will close the sheet and go back to the summary sheet. I figure it will involve some code but don't know where to start.
    Thanks.

  2. #2
    Platinum Lounger
    Join Date
    Feb 2002
    Location
    A Magic Forest in Deepest, Darkest Kent
    Posts
    5,681
    Thanks
    0
    Thanked 1 Time in 1 Post

    Re: Close Button (2000)

    Hi Big Guy

    Howabout

    Sub BackToFront()

    Sheets("Sheet1").Select
    Range("A1").Select
    End Sub

    You could put thi sin a module and assign a custom button in the menu. I am assuming your summary sheet is Sheet1
    Jerry

  3. #3
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Close Button (2000)

    Or use a hyperlink to go back to the summary sheet too...

  4. #4
    Star Lounger
    Join Date
    May 2004
    Location
    Asheville, North Carolina, USA
    Posts
    65
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Close Button (2000)

    I goofed. I am working with different files. I have a file which is my summary sheet which is hyperlinked to the other files. When finished with the file I want a button that will close the file and go back to the summary sheet file. The hyperlink work great going from the summary sheet to the working file but it is closing and going back to the summary which is stumping me.
    Thanks for all the help.

  5. #5
    WS Lounge VIP sdckapr's Avatar
    Join Date
    Jul 2002
    Location
    Pittsburgh, Pennsylvania, USA
    Posts
    11,225
    Thanks
    14
    Thanked 342 Times in 335 Posts

    Re: Close Button (2000)

    <P ID="edit" class=small>(Edited by sdckapr on 03-Jan-07 22:07. Added Macro)</P>What about using the "Back" button on the web toolbar that is displayed by default...

    Or this macro perhaps (change filename, sheet name and range as desire):
    <pre>Sub GotoIndexClose()
    Application.Goto _
    Workbooks("MyIndexFile.xls"). _
    Worksheets("IndexSheet").Range("A1")
    ThisWorkbook.Close
    End Sub</pre>


    Steve

Posting Permissions

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