internet

Bonjour
je pense qu'affecter un lien hypertexte avec l'adresse de la page internet
au bouton devrait faire l'affaire
Patrice

je voudrais avoir la possibilité d'ouvrir une page internet en cliquant sur
un bouton.

est ce possible

merci

ff

Bonjour.

Essaie ( en changeeant le nom du site au besoin) :
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink "http://www.microsoft.com"
End Sub

Cordialement.
Daniel
"fbr" <brossefred@aol.com> a écrit dans le message de news:
utdTy2QSGHA.1576@tk2msftngp13.phx.gbl...

je voudrais avoir la possibilité d'ouvrir une page internet en cliquant
sur
un bouton.

est ce possible

merci

ff

Ou bien comme cela:
avec le navigateur par defaut !
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
Private Const SW_SHOWNORMAL As Long = 1

Sub LanceNavigateur()
Dim s As String
s = "http://dj.joss.free.fr/"
ShellExecute hwnd, "open", s, vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

Daniel

--
===================== FAQ MPFE
http://dj.joss.free.fr/faq.htm
=====================
"fbr" <brossefred@aol.com> a écrit dans le message de news:
utdTy2QSGHA.1576@tk2msftngp13.phx.gbl...

je voudrais avoir la possibilité d'ouvrir une page internet en cliquant
sur
un bouton.

est ce possible

merci

ff