Automatic rename of Excel Worksheets

  stubacka2 11:40 29 Jun 06

Is there an easy way to automatically rename a large number of worksheets within an Excel workbook numerically from 1 to ?????????? (say 200)

  VoG II 11:47 29 Jun 06

Sub RNM()
Dim n As Integer, wsht As Worksheet
n = 0
For Each wsht In Worksheets
n = n + 1
wsht.Name = n
Next wsht
End Sub

  stubacka2 11:54 29 Jun 06

Thanks VoG

Spot on as usual

This thread is now locked and can not be replied to.

New Google phones UK release date | Pixel XL price, new features, specifications: Pixel X and…

1995-2015: How technology has changed the world in 20 years

This is the future of TV, VR and holograms

iOS 10 troubleshooting tips: Simple fixes for the most common iOS 10 problems, from network…