Pulling the Same Column from Multiple Tabs onto one Sheet

cdowns122

New Member
Joined
Jun 13, 2008
Messages
2
Hello,

I have a worksheet with 60 tabs. I am trying to pull Column D from all of these tabs and display them on a new sheet in columns A through BH.

If anyone can shed some light on how I might be able to do this it would be much appreciated.

Thanks.
 

Excel Facts

Why does 9 mean SUM in SUBTOTAL?
It is because Sum is the 9th alphabetically in Average, Count, CountA, Max, Min, Product, StDev.S, StDev.P, Sum, VAR.S, VAR.P.
Some code perhaps.
Code:
Sub PullColD()
Dim ws As Worksheet
Dim wsNew as Worksheet
Dim rng As Range
Dim I As Long
     
    Set wsNew = Worksheets.Add
 
    For Each ws In Worksheets
        If ws.Name <> wsNew.Name Then
          Set rng = wsNew.Range("A1").Offset(,I)
          ws.Range("D:D").Copy rng
          I=I+1
       End If
    Next ws
End Sub
 
Upvote 0
Norie,

Thank you very much for your help with this. I've been trying to find a solution to this issue for a while now and this was a big help.
 
Upvote 0
Some code perhaps.
Code:
Sub PullColD()
Dim ws As Worksheet
Dim wsNew as Worksheet
Dim rng As Range
Dim I As Long
     
    Set wsNew = Worksheets.Add
 
    For Each ws In Worksheets
        If ws.Name <> wsNew.Name Then
          Set rng = wsNew.Range("A1").Offset(,I)
          ws.Range("D:D").Copy rng
          I=I+1
       End If
    Next ws
End Sub


I apologise for my lack of knowledge - however I have no idea how to us this kind of code. I have managed to find the Macro area in "View"; I click Record, then View Macro then Edit.

I copy and pasted the above code into the file, and tried to change "Worksheets" to the Excel File name.

I am trying to self-teach a lot of Excel so I can improve a lot of systems at work; one of these is attempting to compile a master sheet by pulling out multiple tabs from three excel files.
 
Upvote 0

Forum statistics

Threads
1,213,567
Messages
6,114,344
Members
448,570
Latest member
rik81h

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top