Bonjour,
j'ai un petit problème pour supprimer une ligne dans "excel".
Voici mon code :
-> vmsexcel.ActiveSheet.Rows.Delete; Marche .... supprime toutes les lignes .... Mon classeur est vide :-( bof bof comme solution.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 vMSExcel := CreateOleObject ('Excel.Application'); ... aFileName := ExtractFilePath(Application.ExeName)+'liste.xlsx'; // Path+'liste.xls' -> contient la base de donnée vXLWorkbooks := vMSExcel.Workbooks; vXLWorkbook := vXLWorkbooks.Open(aFileName); aSheetName := 'liste'; // Onglet 'liste' dans le classeur Excel vWorksheet := vXLWorkbook.WorkSheets[aSheetName];
-> vmsexcel.ActiveSheet.Rows(1).Delete; ne marche pas .... me dit "Membre introuvable" même si je défini manuellement de nom de la feuille.
Pour info : Windows 10 / Delphi XE / Excel 2016
Si quelqu'un a une idée....
Partager