View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Mike Fogleman Mike Fogleman is offline
external usenet poster
 
Posts: 1,092
Default 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