ActiveX Navigateur Web de Microsoft Objet (intégration de page web en fichier excel)

J'essaie d'intégrer de la page web en .xlsm fichier Excel 2010. Que ce que j'ai fait jusqu'à présent :

Dans la feuille "Sheet1" j'ai inséré contrôle ActiveX appelé "Navigateur Web Microsoft" son nom par défaut est WebBrowser1 (Développeur->Insert->Plus de Contrôles->Navigateur Web de Microsoft). Ensuite, à l'aide de l'éditeur VBA et j'ai placé le code suivant dans la feuille de module de la feuille Sheet1 :

Private Sub Worksheet_Activate()
WebBrowser1.Navigate "http://stackoverflow.com/"
End Sub

J'ai essayé divers sites web et les fichiers html placé sur mon disque dur local, mais le contenu affiché dans WebBrowser1 contrôle est toujours le même - "Internet Explorer Ne peut pas Afficher La Page' erreur pas d'erreur à partir d'Excel VBA seul. Il semble que le Navigateur Web de Microsoft Objet ne peut pas établir de connexion à la page web.

InformationsquelleAutor Qbik | 2015-01-20
  1. 5

    essayez ceci:

        'declare the web browser object for future reference and /or for listening to its events
    Dim WithEvents ie As WebBrowser

    'navigate when the worksheet is activated.
    Private Sub Worksheet_Activate()
        Set ie = ActiveSheet.WebBrowser1
        ie.Navigate2 "http://stackoverflow.com/"
    End Sub
    • ce n'déclarant avec ` Dim WithEvents " modifier les propriétés des WebBrowser objet ?
    • L'instruction Dim WithEvents nous allons enregistrer l'objet en question afin de VBA peut l'écouter à l'événement, un peu comme pour l'objet de feuille de calcul qui exposent par défaut, les événements (onActivate , SelectionChange , ecc.). Donc, pour le WebBrowser , par exemple , vous serez en mesure de code sur le OnQuit , onDownloadComplete événements , et beaucoup plus. Il ne fait pas de changement c'est bien .
    InformationsquelleAutor Leonardo Atalla
  2. -1

    Après Naviguer, vous devez le mettre entre parenthèses peut-être que c'est pourquoi il ne peut pas lire le site.
    Il doit être comme

    WebBrowser1.Navigate("http://www.stackoverflow.com")
    • Ce n'est pas vrai. Soit en charge la syntaxe.
    InformationsquelleAutor Niki Kotsou