Macro ouverture Internet Explorer

M

Michel

Guest
Bonjour le Forum,
J'ai rechercher sur le site et je n'ai pas trouver une macro me permettant d'ouvrir Internet explorer depuis excel.
Je vous remercie d'avance
@ plus
Michel
 
W

wape

Guest
Bonjour Michel et le forum,

Voici deux possibilités :

1. Avec l'API ShellExecute

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd _
As Long) As Long

Const SW_SHOWNORMAL = 1

Sub Main()

ShellExecute 0, "open", "Iexplore.exe", "", "", SW_SHOWNORMAL

End Sub


2. Avec la commande Shell

Sub Main()

Shell "C:\Program Files\Internet Explorer\Iexplore.exe", vbNormalFocus

End Sub


Slts

wape
 

Statistiques des forums

Discussions
312 321
Messages
2 087 265
Membres
103 501
dernier inscrit
talebafia