I would like to create a macro that will increase numerically the worksheet number.
M michael Feb 10, 2005 #1 I would like to create a macro that will increase numerically the worksheet number.
H Harald Staff Feb 10, 2005 #2 Sub AddOne() On Error Resume Next ActiveSheet.Name = CStr(Val(ActiveSheet.Name) + 1) End Sub HTH. best wishes Harald
Sub AddOne() On Error Resume Next ActiveSheet.Name = CStr(Val(ActiveSheet.Name) + 1) End Sub HTH. best wishes Harald