Ouvrir une page internet depuis une macro

DoubleZero

XLDnaute Barbatruc

• 19 Septembre 2017

• #2

Bonjour, "Jipé, le Forum,

Comme ceci ?

Code:

Option Explicit
Sub Internet_site_accéder()
' adaptation d'un code de tatiak (merci !)
    Dim URL As String
    URL = "https://www.excel-downloads.com/forums/forum-excel.7/"    ' adresse adapter
    ThisWorkbook.FollowHyperlink URL
End Sub

A bientôt

 

Vote positif 0 Vote négatif

J

Jipé

XLDnaute Nouveau

• 19 Septembre 2017

• #3

en fait, j'avais en effet au début de mon code VBA l'expression "Option Explicit"
en supprimant cette ligne, mon code initial re fonctionne!
merci beaucoup

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 19 Septembre 2017

• #4

Re-bonjour,

Jipé à dit:

en fait, j'avais en effet au début de mon code VBA l'expression "Option Explicit" en supprimant cette ligne, mon code initial re fonctionne!..

Cliquez pour agrandir...

L'insertion de "Option Explicit" rend obligatoire la déclaration des variables. Il est préférable de l'utiliser lorsque notre niveau en VBA est faible... C'est mn cas .

Code:

Option Explicit
Sub AURA()
    Dim navigate As String
    navigate = "https://www.excel-downloads.com/forums/forum-excel.7/"    ' adresse adapter
    Shell ("C:\Program Files (x86)\Internet Explorer\iexplore.exe " & navigate)
End Sub

A bientôt

 

Vote positif 0 Vote négatif

J

Jipé

XLDnaute Nouveau

• 19 Septembre 2017

• #5

Je comprends
Mais mon module contient quelques dizaines de lignes contenant d'autres instructions qui ne nécessitent pas le "Option Explicit", et donc, en le rajoutant, il me "sabote" quelques macros
Donc, tant que je peux m'en passer ;-)

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 19 Septembre 2017

• #6

Re-bonjour,

Jipé à dit:

... il me "sabote" quelques macros ..Donc, tant que je peux m'en passer ;-)

Cliquez pour agrandir...

A toutes fins utiles, pour les futurs codes, de précieuses informations : ici.

A bientôt

 

Vote positif 0 Vote négatif

J

Jipé

XLDnaute Nouveau

• 19 Septembre 2017

• #7

Cool merci

 

Vote positif 0 Vote négatif