hi. how do i make a macro that returns the value of the cell next to the word
"total" from all worksheets which are listed in column A? i got to make the
macro that lists all worksheets in that workbooks into a summary worksheet.
Now i would like to find the value of the total amount in each worksheet and
return it to the next column of their corresponding sheet name lists? the
first macro is like this:

Sub auto_open()
Sheets("summary").Activate
x = 1
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
Cells(x, 1).Value = ws.Name
x = x + 1
Next ws
Cells(1, 2).Value = x - 1
End Sub