Bonjour
j'ai les adresses url de differents instruments répertoriés dans un tableau.Je souhaite automatiser sur firefox l'ouverture d'autant d'onglet que de ligne présente dans ce tableau. Je pense qu'il faut passer par un offset(0,1) et boucler via un Do Until mais je reste bloqué a la ligne sendkeys "T".
Jusqu'ici j'ai écrit cette macro qui ouvre firefox et pointe sur la premiere ligne de mon tableau, mais le focus vers l'url ne se fait pas, ainsi que l'ouverture vers un nouveau onglet ( ALT+D;CTRL+T).
Donc dans l' exemple ci dessous ouvrir 3 onglets sous firefox

Pouvez vous m'aider ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub ouvrir
Dim, ret, app
app=("c:\Program Files (x86)\Mozilla Firefox\firefox.exe
ret =Shell (app,1)
SendKeys "%{D}"
SendKeys "^{T}",True
End Sub
Appareil 1 https:\nom du serveur\ID11111
Appareil 2 https:\nom du serveur\ID55511
Appareil 3 https:\nom du serveur\ID198511