The correct answer is :
sheets = Book.Sheets xlWs = sheets.Add(Before=None, After=sheets(sheets.Count)) xlWs.Name = "Data1"