Results 1 to 3 of 3
  1. #1
    Star Lounger
    Join Date
    Aug 2002
    Location
    Michigan, USA
    Posts
    52
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Copy worksheet to end position... (2000)

    Can someone please let me know if there is some VBA code that can copy an existing worksheet to the RIGHT of the last existing worksheet (the end). HOWEVER, THE CATCH is that I do not know the name of the current last worksheet.

  2. #2
    Gold Lounger
    Join Date
    Feb 2001
    Location
    Dublin, Ireland, Republic of
    Posts
    2,697
    Thanks
    1
    Thanked 0 Times in 0 Posts

    Re: Copy worksheet to end position... (2000)

    The following will copy Sheet1 of the activeworkbook the right of the last sheet in th eworkbook.

    Dim intSheets
    intSheets = ActiveWorkbook.Sheets.Count
    Sheets("Sheet1").Copy After:=Sheets(intSheets)

    Andrew C

  3. #3
    Star Lounger
    Join Date
    Aug 2002
    Location
    Michigan, USA
    Posts
    52
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Copy worksheet to end position... (2000)

    Ahhh, the .COUNT idea! Very clever, and very effective. This does exactly what I needed it to do, thank you very much for your response!

Posting Permissions

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