Rename worksheet

sgr

New Member
You need to create a code in Excel VBO like below.

Dim wb, ws As Object

Try

wb = GetWorkbook(Handle, Workbook)
ws = wb.Worksheets(Worksheet)
ws.Name = (NewWorksheetName)

Success = True

Catch e As Exception
Success = False
Message = e.Message
Finally
ws = Nothing
End Try

stage.pngcode.pnginput.pngoutput.png
 
Last edited:
Top