Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 Nommer un objet Edge pour pouvoir récupérer des infos

SgTrGt

XLDnaute Nouveau
Bonjour à tous, me lançant dans l'automatisation sur Excel je rencontre quelques difficultés. Quelqu'un aurait-il une solution

Avant j'avais quelque chose comme ça qui me lançait la page et je pouvais récupérer l'adresse que me renvoyait la page, sauf que IE ne passe plus...

VB:
Sub Retour()
url = Feuil1.Range("D3").Text
 Dim Page As Object
    Set Page = CreateObject("InternetExplorer.Application")
    Page.navigate url

J'ai donc chercher et essayé plein de chose mais rien de va
VB:
    'Set Page = CreateObject(Shell("explorer microsoft-edge:" & url & ""))

    'Set Page = CreateObject("Shell.Application").ShellExecute("explorer microsoft-edge:" & url & "")

    'set Page = CreateObject(("Shell.Application").ShellExecute "microsoft-edge:")

    CreateObject("Shell.Application").ShellExecute "microsoft-edge:" & url & ""

     Set Page = CreateObject("Shell.Application").ShellExecute "explorer microsoft-edge:" & url & ""

    Set Page = CreateObject("Shell.Application").ShellExecute "microsoft-edge:" & url & ""

J'arrive a le créer mais pas à le nommer.

Si quelqu'un avait un peu de temps à me consacrer... D'avance un grand merci
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…