Discussion :

[jdadou]

Bonjour à tous,

Après avoir cherché pendant plusieurs heures une solution sur internet, je me tourne vers vous pour avoir un peu d'aide.
J'ai repris le code d'un collègue qui n'a pas le temps de le continuer.
Le but est à travers Vba de créer des utilisateurs et leur donner des croits d'accès.

Mon problème arrive au moment de la sélecton des "groupes d'utilisateurs" auquel il doit appartenir.
Je n'arrive tout simplement pas à sélectionner cela.

Pour vous aider à y voir plus clair, le code html de la page, un imprim écran de la boite de dialogue.

Code html :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
<form action="EditUserGroups.jspa"
      class="aui top-label"
 
      id="user-edit-groups"
      method="post">
    <div class="form-body">
 
<h2>Modifier les groupes d'utilisateurs            </h2>
 
        <div id="userGroupPicker" class="aui-group">
            <div class="aui-item">
                <div class="field-group">
                    <label for="groupsToJoin">Groupes disponibles</label>
 
                        <select id="groupsToJoin" name="groupsToJoin" class="select full-width-field" multiple size="10">
 
                                <option value="ACCENTURE">ACCENTURE</option>
 
                                <option value="CFA">CFA</option>
 
                                <option value="CL">CL</option>
 
                                <option value="EB_Administrateur">EB_Administrateur</option>
 
                                <option value="EB_CFA">EB_CFA</option>
 
                                <option value="EB_CL">EB_CL</option>
 
                                <option value="EB_Controleur">EB_Controleur</option>
 
                                <option value="EB_Demandeurs">EB_Demandeurs</option>
 
                                <option value="EB_GP">EB_GP</option>
 
                                <option value="EB_LO">EB_LO</option>
 
                                <option value="EB_RP">EB_RP</option>
 
                                <option value="EB_RPC">EB_RPC</option>
 
                                <option value="EB_RSL">EB_RSL</option>
 
                                <option value="EDGTS">EDGTS</option>
 
                                <option value="FIEGE-CLC">FIEGE-CLC</option>
 
                                <option value="FIEGE-LAGER">FIEGE-LAGER</option>
 
                                <option value="FIEGE-QS">FIEGE-QS</option>
 
                                <option value="FIEGE-TO">FIEGE-TO</option>
 
                                <option value="FIEGE-VERSAND">FIEGE-VERSAND</option>
 
                                <option value="FIEGE-ZUSCHNITT">FIEGE-ZUSCHNITT</option>

En code j'ai essayé depuis vba:

Code :

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

1
2
Set elementHtml = ie.Document.getElementById("groupsToJoin").GetElementsByTagName("option")
      elementHtml.Options("EB_CFA").Selected = True

EB_CFA étant l'un des intiulés de ma liste de choix.

Je ne suis pas mauvais en Vba, mais j'ai beacoup de mal avec le html.

Toute aide sera la bienvenue !
Merci d'avance
Jd