rename specific excel sheet

[Lapas]

this works:

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets("sheet1").Name := "Summary"
return

but i need choose which sheet will be rename with variable so i try this:

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
variable="sheet1"   =<didnt work
;variable=sheet1   =<didnt work

return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets(variable).Name := "Summary"
return

and this of course too didnt work

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
variable="sheet1"   =<didnt work
;variable=sheet1   =<didnt work

return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets(%variable%).Name := "Summary"
return

how i can add and rename the sheet which i add?

[FanaticGuru]

this works:

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets("sheet1").Name := "Summary"
return

but i need choose which sheet will be rename with variable so i try this:

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
variable="sheet1"   =<didnt work
;variable=sheet1   =<didnt work

return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets(variable).Name := "Summary"
return

and this of course too didnt work

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
variable="sheet1"   =<didnt work
;variable=sheet1   =<didnt work

return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    ObjWorkbook.Sheets(%variable%).Name := "Summary"
return

how i can add and rename the sheet which i add?

Code: Select all

#SingleInstance, Force

ObjExcel := ComObjCreate("Excel.Application")
ObjExcel.Visible := True
ObjWorkbook := ObjExcel.Workbooks.Add()
return

F1::
    ObjWorkbook.Worksheets.Add() ; Add Worksheet
    OldName := "sheet1", NewName := "Summary"
    ObjWorkbook.Sheets(OldName).Name := NewName
return

You just need to get the basic syntax of variable usage correct. When you use " : % are important.

FG