Workbooks and worksheets.
This will put the values of C5 & G5 from each sheet on sheet1 in columns C&D
starting on row 5, with headers on row 4.
Sub list()
Dim sh As Worksheet
Dim rownum As Integer
rownum = 4
For Each sh In Worksheets
Sheet1.Range("C" & rownum).Value = sh.Range("C5").Value
Sheet1.Range("D" & rownum).Value = sh.Range("G5").Value
rownum = rownum + 1
Next sh
Sheet1.Range("C4") = "NAME"
Sheet1.Range("D4") = "AMOUNT OWED"
End Sub
Mike F
"Mike" wrote in message
...
Working in one workbook with many worksheets.
Looking to make a summary, orlisting sheet.
?In multiple sheets C5 = name G5 = amount owed.
Would like to create a itemized summary sheet listing all names and
corresponding amounts.
I have no idea.
THanks in advance.
Mike
|