Ok, this is driving me mad. I have a number of worksheets with the same layout. I need to take the same cell from each of those worksheets and place it on the Summary worksheet beside each other. So, it would be taking cell D9 from the first worksheet and placing it in cell C3 on summary worksheet, then take cell D9 from the next worksheet and place it in cell D3 on the Summary, then filling E3, F3, etc
I can get this to happen going down the rows using the following code:
But I dont want it to go down, I want it to go over.
Please help
I can get this to happen going down the rows using the following code:
Code:
Sub MakeSummaryTable()
Dim ws As Worksheet
Application.ScreenUpdating = False
Sheets("Summary").Activate
For Each ws In Worksheets
If ws.Name <> "Summary" Then
ws.Range("d9").Copy
ActiveSheet.Paste Range("c355").End(xlUp).Offset(1, 0)
Application.CutCopyMode = False
End If
Next ws
Application.ScreenUpdating = True
End SubPlease help