VBA - Ouvrir un lien dans une cellule avec un navigateur spécifique

[winnie]

Bonjour, je cherche à tester la compatibilité de site via plusieurs navigateur.

J'aimerai rendre cela automatique par le biais d'une macro.

Je souhaite donc que le navigateur x ouvre l'adresse situé dans la cellule A9 par exemple.

Pour l'instant j'ai modélisé vulgairement cela comme pour bien montrer ce que je veux :

Sub firefoxII()

Dim RetVal

RetVal = Shell("C:\program files (x86)\mozilla firefox\firefox.exe Range("A9")", 1)


End Sub


Merci par avance

 

[mromain]

Re : VBA - Ouvrir un lien dans une cellule avec un navigateur spécifique

Bonjour winnie,


Je n'ai pas tester, mais ton idée de base avait une erreur de syntaxe.
essaye avec cette ligne :

RetVal = Shell("C:\program files (x86)\mozilla firefox\firefox.exe " & Range("A9").Text, 1)

a+

 

[winnie]

Re : VBA - Ouvrir un lien dans une cellule avec un navigateur spécifique

J'ai testé et ca ne m'ouvre que ma page d'accueil de Mozilla et non pas l'adresse internet située dans la cellule A9 elle même située sur ma feuille 1

mais merci déjà pour ce petit coup de pouce, peut être y a t-il un autre moyen de modéliser ce que je veux faire

 

[mromain]

Re : VBA - Ouvrir un lien dans une cellule avec un navigateur spécifique

Re,

Bizarre, si j'ai

http://www.excel-downloads.com/

en A9, le code

Sub Test()
Dim RetVal  As Long

    RetVal = Shell("C:\Program Files\Mozilla Firefox\firefox.exe " & Range("A9").Text, 1)
End Sub

m'ouvre bien firefox à l'adresse indiquée en A9

a+

 

[winnie]

Re : VBA - Ouvrir un lien dans une cellule avec un navigateur spécifique

oulala...

autant pour moi le lien que j'avais en A9 avait subitement disparu et je viens de m'en apercevoir. Je te remercie donc pour ton aide.