+ Reply to Thread
Results 1 to 5 of 5

Cycle Through Specific Worksheets & Paste Data In Each Sheet

  1. #1
    Registered User
    Join Date
    12-18-2012
    Location
    Miami, Florida
    MS-Off Ver
    Excel 2007
    Posts
    61

    Cycle Through Specific Worksheets & Paste Data In Each Sheet

    I need assistance with a way to cycle through many numerically named worksheets (over 300) and paste data in the same cell (ie "A18") on each sheet. I have a large workbook that contains many sheets that are a mix of string named and numerically named sheets. I want to exclude string named worksheets in this workbook.

    1) Need to loop through ALL numerically named sheets only and paste data (named range) in the same cell location on each sheet.

    2) I have formulas and links that are included in the special paste.

    Your assistance is greatly appreciated.

  2. #2
    Forum Guru
    Join Date
    07-25-2011
    Location
    Florida
    MS-Off Ver
    Excel 2003
    Posts
    9,643

    Re: Cycle Through Specific Worksheets & Paste Data In Each Sheet

    Try something like this. Change the Sheet name and Named Range to suit.

    Please Login or Register  to view this content.

  3. #3
    Registered User
    Join Date
    12-18-2012
    Location
    Miami, Florida
    MS-Off Ver
    Excel 2007
    Posts
    61

    Re: Cycle Through Specific Worksheets & Paste Data In Each Sheet

    Ran subroutine. Did not work. Numerically named sheets are like 1-1-1, 2-18-2, 3-24-1. I have to subroutine stored in same workbook.

  4. #4
    Forum Guru
    Join Date
    07-25-2011
    Location
    Florida
    MS-Off Ver
    Excel 2003
    Posts
    9,643

    Re: Cycle Through Specific Worksheets & Paste Data In Each Sheet

    Quote Originally Posted by DDM64 View Post
    Ran subroutine. Did not work. Numerically named sheets are like 1-1-1, 2-18-2, 3-24-1. I have to subroutine stored in same workbook.
    Well technically those are not numbered names. They are text names with numbers.

    Try this line to test the sheet name...

    If ws.Name Like "*#-#*-#*" Then

    Replace this line with the above...
    If IsNumeric(ws.Name) Then
    Last edited by AlphaFrog; 12-18-2012 at 11:58 PM.

  5. #5
    Registered User
    Join Date
    12-18-2012
    Location
    Miami, Florida
    MS-Off Ver
    Excel 2007
    Posts
    61

    Re: Cycle Through Specific Worksheets & Paste Data In Each Sheet

    [SOLVED] You are awesome! It worked great. Thanks a bunch for your help. Happy Holidays...

+ Reply to Thread

Thread Information

Users Browsing this Thread

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

Tags for this Thread

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