Je vous fais partager qqch que j'ai eu du mal à extraire du forum et que je trouve sympathique ; ça aidera des gens, c'est sûr.

Je n'en suis nullement l'auteur !

Mettre ceci dans Déclarations :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
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
Mettre ceci ensuite dessous :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub Macro1()
 
'La ligne suivante affiche le site Developpez.com dans le navigateur par défaut, en fournissant le répertoire de votre application comme répertoire par défaut :
ShellExecute 0, "open", "http://www.developpez.com", "", "", 1
 
End Sub