changes the value of the Name property of the first worksheet in the first workbook of the Excel application:
Sub changeValue() Application.Workbooks(1).Worksheets(1).name = "My Sheet" End Sub