Après la récente version de Windows 10, y compris le nouveau navigateur, Microsoft Edge, n’importe qui saurait-il simplement comment ouvrir le navigateur Microsoft Edge via Excel VBA. J'ai essayé de chercher sur le site sans aucune chance.
Voici le code de base VBA Excel actuel que j'utilise pour ouvrir Internet Explorer:
Sub xyz()
Dim Browser As SHDocVw.InternetExplorer 'Microsoft Internet Controls
Dim HTMLdoc As MSHTML.HTMLDocument 'Microsoft HTML Object Library
Dim URL As String
URL = "http://www.bbc.co.uk/news"
Set Browser = New InternetExplorer
Browser.Silent = True
Browser.navigate URL
Browser.Visible = True
Do
Loop Until Browser.readyState = READYSTATE_COMPLETE
Set HTMLdoc = Browser.document
End Sub
Il s’agit par exemple d’un code VBA très simple à utiliser pour ouvrir le site Web de la BBC.
Cependant, quel est le nouveau code pour ouvrir Microsoft Edge?
Selon MS ici , IE11 est livré avec Windows 10
Le navigateur par défaut pour Windows 10 est Microsoft Edge, qui est alimenté par notre nouveau moteur de rendu et constitue notre voie à suivre pour le Web sous Windows. Les développeurs de sites doivent concentrer leurs tests sur Microsoft Edge pour les expériences nouvelles et existantes. Internet Explorer 11 sera inclus pour certains scénarios hérités et les utilisateurs auront la possibilité de le choisir comme navigateur par défaut, comme pour tout autre navigateur.
Le code existant pour IE devrait donc continuer à fonctionner. Pas essayé cependant.
Certains éléments techniques sur Edge peuvent être trouvés ici
Depuis le lundi 10 août 2015, j'ai mis à niveau un ordinateur de Win 7 Pro SP1 vers Win 10 Pro et le code que vous avez fourni fonctionne correctement. IE11 fonctionne bien et montre le site Web. La page de téléchargement IE11 confirme que je l’ai déjà installée.
J'ai eu un problème similaire lors de la mise à jour vers Windows 10. Il s'est avéré que "Microsoft Internet Controls" et "Microsoft HTML Object Library" avaient été "supprimés" de "Références". En les ajoutant, le problème a été résolu et le code a bien fonctionné sans aucune modification. Je ne sais pas si cela aide.
Ce n'est peut-être pas une réponse, mais cela a fonctionné pour moi.
L'objet Internet Explorer sera toujours ouvert via VBA dans Windows 10 à l'aide d'IE11. Cependant, j'ai dû demander à Cortana d'ouvrir IE11 en premier pour qu'il trie toutes les fenêtres contextuelles "à la première utilisation", entre autres choses. "Bienvenue sur IE11" et "Commençons" etc.
Une fois que j'ai traversé tout cela et fermé le navigateur. J'ai relancé ma macro et l'objet du navigateur s'est bien déroulé et a fonctionné normalement. J'espère que ça aide quelqu'un.
P.S. J'utilise la méthode CreateObject pour créer la fenêtre du navigateur.
comment ouvrir le navigateur Microsoft Edge via Excel VBA
VBS/VBA utilise le modèle d'objet COM (ActiveX) pour communiquer avec les processus de bureau et cette fonctionnalité ne sera pas disponible pour Edge.
Heureusement, de nouvelles solutions inter-navigateurs (WebDriver, par exemple) existent pour l’automatisation et Edge adopte ces nouvelles normes. Malheureusement, pour les utiliser, les techniques utilisées devront changer.
Doublon de Microsoft Edge prendra-t-il en charge l’automatisation COM (objet InternetExplorer)? .