Changer le nom de l'ajout de la feuille de calcul

objWriteWorkbook.sheets.add ,objWriteWorkbook.sheets(objWriteWorkbook.sheets.count)
Set NewWorksheetObject = objWriteWorkbook.Worksheets(num)
objWriteWorkbook.Sheets(num).Name = sheetName

J'ai voulu changer le nom de l'ajout de la feuille de calcul.
L'ajout de la feuille et de la création d'objet pour cette feuille de travail est bien, mais lorsque je tente de changer le nom de la feuille, j'obtiens une erreur Inconnu"erreur d'exécution"

Quelqu'un peut-il aider comment pouvez modifier le nom de l'ajout de la feuille.

InformationsquelleAutor surendra | 2013-03-22
  1. 4

    L'attribution de la nouvelle feuille d'une variable lorsque vous ajoutez:

    Set ws = wb.Sheets.Add(, wb.Sheets(wb.Sheets.Count))
ws.Name = sheetName
    InformationsquelleAutor Ansgar Wiechers
  2. 1
    set xlo=CreateObject("excel.application")
set wbo=xlo.workbooks.open("C:\Users\XXX\Desktop\Temp.xlsx")
Set ws = wbo.Sheets.Add(, wbo.Sheets("sheet1"))
ws.Name = "Priyesh"


wbo.save
wbo.close
xlo.quit
set wbo=nothing 
set xlo=Nothing
    InformationsquelleAutor Rajesh Kumar