+ Reply to Thread
Results 1 to 4 of 4

Copy data from all sheets but sheets name based on a list

  1. #1
    Forum Contributor HaroonSid's Avatar
    Join Date
    02-28-2014
    Location
    india
    MS-Off Ver
    Excel 2013
    Posts
    2,078

    Post Copy data from all sheets but sheets name based on a list

    hi,
    i am using below to copy data from multiple sheets and paste to sheets("bal")
    Please Login or Register  to view this content.
    i need change in my code, hope someone will help

    i want to copy data only from those sheets which one are on the list Sheets("bal").range("E8:E38")

    and paste data to sheets("bal").range("F8")

    thank you
    Last edited by HaroonSid; 03-20-2018 at 04:41 AM.
    Use Code-Tags for showing your code :
    Please mark your question Solved if there has been offered a solution that works fine for you
    If You like solutions provided by anyone, feel free to add reputation using STAR *

  2. #2
    Registered User
    Join Date
    03-20-2018
    Location
    Philippines
    MS-Off Ver
    2013
    Posts
    16

    Re: Copy data from all sheets but sheets name based on a list

    Please attached sample workbook so I can help.

  3. #3
    Forum Contributor HaroonSid's Avatar
    Join Date
    02-28-2014
    Location
    india
    MS-Off Ver
    Excel 2013
    Posts
    2,078

    Re: Copy data from all sheets but sheets name based on a list

    Here is sample workbook
    Attached Files Attached Files

  4. #4
    Forum Expert
    Join Date
    11-24-2013
    Location
    Paris, France
    MS-Off Ver
    Excel 2003 / 2010
    Posts
    9,831

    Cool

    Hi !

    PHP Code: 
    Sub Demo1()
               Const 
    6
                 Dim W
    V
        
    If Sheet5.[E8].Value "" Then
            
    For Each W In Sheet5.Range("E8"Sheet5.[E7].End(xlDown)).Value
                With Worksheets
    (W)
                    If .[
    B2].Value 0 Then
                        V 
    = .Range("D2", .Cells(Rows.Count4).End(xlUp)(1C)).Value
                        Sheet5
    .Cells(Rows.Count6).End(xlUp)(2).Resize(UBound(V), C).Value V
                    End 
    If
                
    End With
            Next
        End 
    If
    End Sub 
    Do you like it ? So thanks to click on bottom left star icon « Add Reputation » !

+ Reply to Thread

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. [SOLVED] Copy Paste From Rawdata Sheets to Multiple Sheets Based on Sheet names
    By farrukh in forum Excel Programming / VBA / Macros
    Replies: 4
    Last Post: 07-16-2017, 11:01 PM
  2. Generate list on sheet 1 based on data in sheets 2-5
    By jmorse6 in forum Excel General
    Replies: 2
    Last Post: 10-05-2015, 08:30 AM
  3. [SOLVED] Move data to specific sheets based on value against a list
    By daveb86 in forum Excel Programming / VBA / Macros
    Replies: 12
    Last Post: 10-16-2014, 03:27 PM
  4. Replies: 0
    Last Post: 11-04-2013, 01:48 PM
  5. [SOLVED] Excel vba copy data from general sheets and organize them in separate sheets.
    By excelsubb in forum Excel Programming / VBA / Macros
    Replies: 40
    Last Post: 01-24-2013, 08:01 AM
  6. [SOLVED] Copy Data to Master List from Multiple Sheets
    By Jrub in forum Excel Programming / VBA / Macros
    Replies: 1
    Last Post: 10-18-2012, 12:59 PM
  7. Copy data from 2 sheets based on date
    By drewship in forum Excel Programming / VBA / Macros
    Replies: 10
    Last Post: 02-11-2010, 11:04 AM

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