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
Partager