active sheet

[bob engler]

I am trying to do a for loop to get each sheet in Worksheets and then
extract data from that active sheet. What would the 'for' statement be???


Thanks

 

[Frank Kabel]

Hi
try
...
Dim wks as worksheet
for each wks in activeworkbook.worksheets
msgbox wks.Range("A1").value
next