Discussion :

[Dany_04]

Bonjour,

J'essaie d'automatiser une action que je dois exécuter sur de nombreux fichiers excel : enlever la validation de donnée d'une série de cellules.

J'ai essayer le code suivant, en prenant exemple sur une macro enregistré dans excell :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

vWorksheet.range['F9','AA34'].Validation.add(xlValidateInputOnly,xlValidAlertStop,xlBetween);

Mais, je reçois une erreur OLE 0800A03EC.

J'ai essayé l'exemple trouvé dans la faq (validation de donnée) et j'ai le même problème.

Quelqu'un pourrait me venir en aide ..

Merci d'avance


Dany

[ShaiLeTroll]

Tu as déjà posé la même question
"enlever la validation de donnée d'une cellule excel via Delphi" le 22/06/2011 à 16h14

Pourquoi l'avoir marqué résolu si ça ne l'était pas ?

L'erreur 0800A03EC n'existe pas !
C'est 800A03EC, je sais c'est subtile mais il faut être précis pour comprendre un HRESULT

800A 03EC

8 = Error
A = Message concernant un Control
03EC = 1004 = ERROR_INVALID_FLAGS

Tu défini xlBetween mais sans définir de Borne !
C'est donc évident qu'ils refusent !

As tu faire l'effort de lire MSDN - Validation.Add Method (Excel) et d'essayer de comprendre le code que tu écrit bêtement en recopiant ?

Between. Can be used only if two formulas are provided.

As-tu bien compris que le but de cette méthode Add est d'ajouter une validation ?
Avec un peu d'imagination, on trouve qu'il existe une méthode pour supprimer une validation !
MSDN - Validation.Delete Method (Excel)

Merci Qui ?
Merci

[Dany_04]

Oui, j'ai posé la même question. Mais, je me suis aprerçu le lendemain que je m'étais trompé d'endroit ... .. j'ai donc reposté. Et j'ai bien fait vu la réponse ..

J'ai effectivement copié bêtement la macro que j'avais enregistré sous Excell, et en m'aidant d'un exemple trouvé via google je l'ai transformé en Delphi ... Et, je suis passé complètement à côté de la méthode DELETE qui était pourtant bien écrite au début dans la macro ...

Et donc,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

vWorksheet.range['F9','AA34'].Validation.Delete

fonctionne très bien et correspond à ce qu'il me fallait.
Du coup, je ne sais pas ce que fait le Add dans la macro ???? mais bon ce n'est pas grave.

Merci pour le lien MSDN - Validation.Add Method (Excel), je ne connaissais pas et Google mon ami ne me l'avait pas fourni ...

Merci pour ta réponse claire et rapide.


Dany