J'ai tenté de modifier le code ci-dessous afin que la page Web ouverte est de l'URL collé dans une cellule spécifique; C5 de la feuille intitulée «Page principale». Ceci est requis car l'URL modifiera fréquemment.
Auparavant, le code était maintenant, j'ai inséré Cependant, cela a renvoyé l'erreur suivante: RUN-TIME'438'ERROR - L'objet ne prend pas en charge cette propriété ou cette méthode.
est-ce résultat d'IE ne pouvant pas être capable d'identifier initialement cette URL? Toute idée sur la manière de rendre cette fonction de manière appropriée est la bienvenue. .navigate2 "www.example.com" . ".Mainpage.Range (" C5 "). Hyperliens (1) .Suivre" dans le code dans une tentative d'ouverture de l'URL de la cellule spécifiée.
3 Réponses :
Cela fonctionne pour moi: 
doit être mainpage n'est pas une propriété de IE
Merci pour votre commentaire; entendu. Cependant, cela n'a pas d'impact sur le code suivant à partir de: avec.document?
Non, cela n'affectera qu'une ligne où vous supprimez la période de pointe.
Merci pour votre commentaire Tim. J'ai édité le code ci-dessus pour refléter les changements. Cela étant dit, l'erreur suivante est renvoyée par rapport à la partie 'with.document' du code: - «Erreur d'exécution» -2147467259 (80004005) ': méthode' Document 'de l'objet' iWebBrowser2 'a échoué' aucune pensée?
Après un hyperlien n'utilise pas nécessairement l'objet IE que vous venez de créer. Vous devez revenir à la méthode Navigate. .navigate2 Mainpage.Range ("C4"). Valeur
Quelle version d'Excel utilisez-vous? J'ai essayé de tester le code suivant dans Excel 2016, tout fonctionne bien, vous pouvez essayer de créer une nouvelle feuille de calcul et de tester le code suivant: (Dans mon échantillon, je crée une feuille de calcul appelée "page principale", puis ajoutez un lien Dans la cellule C5)
Dim ie As Object, MainPage As Worksheet
Set ie = CreateObject("InternetExplorer.Application")
Set MainPage = ThisWorkbook.Worksheets("Main Page")
ie.Visible = True
ie.Navigate MainPage.Range("c5").Hyperlinks(1).Address