Ouvrir une page web

Résolu
Deudeu79 Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   -  
Deudeu79 Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour tout le monde,

j'ai crée une page web et je voudrais que avec une macro je puisse l'ouvrir dans un navigateur web j'ai essayer avec la méthode shell mais impossible il ne veux pas me l'ouvrir es ce que quelqu'un peux m'aider s'il vous plait

je vous remercie d'avance
A voir également:

2 réponses

Réponse 1 / 2
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

Comme ceci: 

Option Explicit
Private Const SW_SHOWNORMAL As Long = 1&
Private Const SW_MAXIMIZE   As Long = 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

Public Sub RunUrl(ByVal sUrl As String, Optional ByVal bMaximized As Boolean = False)
    ShellExecute 0&, "open", sUrl, vbNullString, vbNullString, IIf(bMaximized, SW_MAXIMIZE, SW_SHOWNORMAL)
End Sub

Private Sub CommandButton1_Click()
RunUrl ("http://www.commentcamarche.net/forum/affich-31955833-ouvrir-une-page-web")
End Sub

2
Deudeu79 Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   23
 
bonjour,

merci pivert avec ton code cela fonctionne
0
Réponse 2 / 2
PlacageGranby Messages postés 402 Statut Membre 26
 
Bonjour,

Ci-joint, quelqu'un qui posait la même question.
https://forums.commentcamarche.net/forum/affich-19435352-ouvrir-une-page-internet-depuis-vba

Peux-tu nous indiquer ton code qui ne fonctionne pas avec shell, car si cela ne fonctionne pas, il faut investiguer le code.
0