Automatic rename of Excel Worksheets

  stubacka2 11:40 29 Jun 2006

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 2006

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 2006

Thanks VoG

Spot on as usual

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

Elsewhere on IDG sites

The Evil Within 2 review-in-progress

Adobe shows still-in-development tools, including automatically colourising black-and-white photos

iPhone X news: Release date, price, new features & specs

Comment transformer un iPhone en borne Wi-Fi ?