VBA Excel - Internet Explorer checkbox & script

Bonjour,

je suis en train de concevoir un outil d'export de données pour mon boulot et je bute sur une checkbox que je n'arrive pas à décocher :weird:.

Ci dessous le code de la page web :

Code:

---

<button onclick="jsExportExcel('3C2SMOA','personnaliseeTmp!0_1.req','Requête_temporaire_personnalisée_du_2_au_2','1','')" title="Requête_">Exporter ces r&eacute;sultats vers Excel...</button><input type="checkbox" name="formatCSV" id="formatCSV" value="on" checked > csv</div><div id="afficheResultats"><table style="width:100%;"><tr id="lgntot"><th class="TBRentete" >Ré

---

je clique sur de nombreuses Checkbox sans problème mais celle ci pas moyen .... Ci dessous un exemple de code que h'utilise pour d'autres checkbox mais qui ne fonctionne pas ici :

Code:

---

1 2	Set IECtrla = htmlDoc.forms(0).elements("formatCSV") IECtrla.Click

---

Pour info, j'ai vu que "Format CSV" est utilisé pour une fonction au dessus :

Code:

---

1 2 3 4 5 6

function jsExportExcel( Code, ficReq, Fichier, NoReq, NoReqTot ) { if( document.getElementById('formatCSV').checked ){ var LibFic = '&fichierCSV='; } else { var LibFic = '&fichierExcel='; }

---

Si quelqu'un aurait la solution ou une idée je suis grandement preneur.

Cdt.

Kocipia.

Bonjour, bonjour !

Sans lien sur la page web … Car un micro bout d'HTML est forcément insuffisant pour tester ‼

Et en changeant sa valeur ?

Bonjour Marc-L,

En faite je ne peux pas te transmettre la page web qui est de l'intranet.


J'avance doucement, avec le code ci dessous je lance le script :

Code:

---

IE.Document.parentWindow.execScript "jsExportExcel();", "Javascript"

---

Il ne me reste plus qu'à trouver le moyen de le lancer avec la variable LibFic = excel :

Code:

---

1 2 3 4 5 6

if( document.getElementById('formatCSV').checked ){ var LibFic = '&fichierCSV='; } else { var LibFic = '&fichierExcel='; }

---

Merci.

J'ai fini par trouvé, pour ceux que ça interresse :

Code:

---

1 2	If IE.Document.getElementById("formatCSV").Checked = True Then IE.Document.getElementById("formatCSV").Checked = False

---