Bonjour,
J'essaie d'éditer une feuille Excel dans Delphi 7.
Je souhaite verrouiller quelques cellules pour empêcher l'utilisateur de les modifier.
Ci dessous le code que j'utilise
Le message d'erreur est: (Methode 'DrawingObjects' non supportée par l'objet automation) à l'execution de la ligne signalée par erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 vMSExcel.Sheets.Select; vMSExcel.Cells.Select; vMSExcel.Selection.Locked := False; vMSExcel.Range['A1:A3'].Select; vMSExcel.Selection.Locked := True; vMSExcel.Sheets.DrawingObjects:=True; <=== Erreur vMSExcel.Sheets.Contents:=True; vMSExcel.Sheets.Scenarios:=True;
Cet exemple je l'ai fait à partir d'un exemple en VB
Merci par avance pour votre contribution
Partager