help needed with excel 97

S

sithlord3k

I need help with a problem that I'm having. I've got about 300 sheets i
my excel workbook. I need to copy the data from cell B5 on ever
sheet,into a new sheet.
What can I do
 
B

Bob Phillips

i=1
For j = 1 To ActiveWorkbook.Worksheets.Count
If Worksheets(i).Name <> Activsheet.Name Then
Range("A" & i).Value = Worksheets(i).Range("B5").Value
End If
Next j
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top