Hinzufügen von Excel-Arbeitsblättern zum Arbeitsmappenende

Question

Ich versuche Excel-Arbeitsblätter am Ende einer Arbeitsmappe hinzuzufügen und reserviere das erste Arbeitsblatt für eine Zusammenfassung.

import win32com.client 

Excel = win32com.client.DispatchEx('Excel.Application') 
Book = Excel.Workbooks.Add() 

Excel.Visible = True 

Book.Worksheets(3).Delete() 
Book.Worksheets(2).Delete() 

Sheet = Book.Worksheets(1) 

Sheet.Name = "Summary" 

Book.Worksheets.Add(After=Sheet) 

Sheet = Book.Worksheets(2) 

Sheet.Name = "Data1" 

Dieser Code fügt das neue Blatt nach links, trotz After=Sheet verwenden, und wenn ich das „Data1“ genannt Blatt ändern, überschreibt das Blatt mit dem Namen „Zusammenfassung“.

Dies ist ähnlich zu diesem Problem:

Adding sheets to end of workbook in Excel (normal method not working?)

aber die angegebenen Lösungen haben für mich nicht.

Answer 1

Versuchen Sheet = excelApp.ActiveSheet mit:

Book.Worksheets.Add(After=Sheet) 
Sheet = Book.ActiveSheet 
Sheet.Name = "Data1"