Consecutive numbering

  • Thread starter Thread starter Esradekan
  • Start date Start date
E

Esradekan

Hope someone can help.

How can I get one cell (B35) on each of 100 worksheets to number
consecutively?

TIA
Esra
 
You should use VBA code for this.
As far as my knowledge goes Worksheets functions won't work.

Hope someone can help.

How can I get one cell (B35) on each of 100 worksheets to number
consecutively?

TIA
Esra




- Show quoted text -
Click to expand...

U should use VBA code.
 
You should use VBA code for this.
As far as my knowledge goes Worksheets functions won't work.





U should use VBA code.
Click to expand...

Thank you for the reply. Can you point me in the direction of how I
can get VBA code for this?

TIA
Esra
 
Hi Eara

Try this

Sub Numbersheets()
Dim i As Long, ws As Worksheet
i = 1
Application.ScreenUpdating = False
For Each ws In ThisWorkbook.Sheets
ws.Range("B35") = i
i = i + 1
Next
Application.ScreenUpdating = True
End Sub

To Install
Copy code above
Alt+F11 to invoke the VB Editor
Alt+I+M to insert a new module
Paste code into White Pane that appears
Alt+F11 to return to Excel

To Use
Alt+F8 to bring up Macros
Select macro name
Run
 
Hi Eara

Try this

Sub Numbersheets()
     Dim i As Long, ws As Worksheet
     i = 1
     Application.ScreenUpdating = False
     For Each ws In ThisWorkbook.Sheets
         ws.Range("B35") = i
         i = i + 1
     Next
     Application.ScreenUpdating = True
End Sub

To Install
Copy code above
Alt+F11 to invoke the VB Editor
Alt+I+M to insert a new module
Paste code into White Pane that appears
Alt+F11 to return to Excel

To Use
Alt+F8 to bring up Macros
Select macro name
Run

--
Regards
Roger Govier





- Show quoted text -
Click to expand...

Perfect, thank you Roger, most helpful

Esra
 
Back
Top