OVH Cloud OVH Cloud

Lancement Internet explorer à partir

3 réponses
Avatar
Alain79
Comment faire pour lancer Internet explorer sur une URL=20
particuli=E8re =E0 partir d'un Sub de vba

J'ai d=E9j=E0 int=E9gr=E9 "Microsoft Internet Controls et entr=E9=20
les lignes suivantes
Dim objIntExpl As Object
Set objIntExpl =3D CreateObject
("InternetExplorer.Application")

Je manque de doc sur l'utilisation de ces controles...
Merci pour votre aide
@+

3 réponses

Avatar
isabelle
bonjour Alain,

voici un exemple,

Dim IE As Object
Set IE = CreateObject("internetexplorer.application")
IE.Navigate ("http://www.blabla.com/")
IE.Visible = True: IE.Top = 0: IE.Left = 0
IE.Width = GetSystemMetrics32(0)
IE.Height = GetSystemMetrics32(1)

isabelle


Comment faire pour lancer Internet explorer sur une URL
particulière à partir d'un Sub de vba

J'ai déjà intégré "Microsoft Internet Controls et entré
les lignes suivantes
Dim objIntExpl As Object
Set objIntExpl = CreateObject
("InternetExplorer.Application")

Je manque de doc sur l'utilisation de ces controles...
Merci pour votre aide
@+


Avatar
Vincent.
IE.navigate "http://www.microsoft.com/france/office/excel/n
ewsgroup/default.asp"
eusse été plus approprié ;-)))

-----Message d'origine-----
bonjour Alain,

voici un exemple,

Dim IE As Object
Set IE = CreateObject("internetexplorer.application")
IE.Navigate ("http://www.blabla.com/")
IE.Visible = True: IE.Top = 0: IE.Left = 0
IE.Width = GetSystemMetrics32(0)
IE.Height = GetSystemMetrics32(1)

isabelle


Comment faire pour lancer Internet explorer sur une URL
particulière à partir d'un Sub de vba

J'ai déjà intégré "Microsoft Internet Controls et entré
les lignes suivantes
Dim objIntExpl As Object
Set objIntExpl = CreateObject
("InternetExplorer.Application")

Je manque de doc sur l'utilisation de ces controles...
Merci pour votre aide
@+
.





Avatar
Alain79
Merci Isbelle pour le support sur les news group Excel et bonne années 2004
(lancement de IE à partir d'une ligne de code VBA dans Excel).

Ce remerciement vient un peu tard mais je ne maîtrise pas encore très bien
la pratique des News group - En particulier je te fais cette réponse à
partir de Microsoft Outlook newsreader et ne suis pas certain que cette
réponse restera attachée au fil de ma question initiale ni de ta réponse...

Au fait à peu près depuis que j'ai testé cette solution, l'aide de toute mes
appli office et Windows est un peu dans les choux - à savoir qu'une partie
des liens dynamiques genre pour un mot clef de VBA les liens "exemples" et
"s'applique à" ne sont plus valide, je ne vois plus qu'un carré dessiné en
dépression mais plus aucun texte et encore moins de lien dynamique... le
fait de lancer IE via Excel peut-il avoir eu une influence sur l'aide ?

Bien Cordialement

Alain79

"isabelle" wrote in message
news:
bonjour Alain,

voici un exemple,

Dim IE As Object
Set IE = CreateObject("internetexplorer.application")
IE.Navigate ("http://www.blabla.com/")
IE.Visible = True: IE.Top = 0: IE.Left = 0
IE.Width = GetSystemMetrics32(0)
IE.Height = GetSystemMetrics32(1)

isabelle


Comment faire pour lancer Internet explorer sur une URL
particulière à partir d'un Sub de vba

J'ai déjà intégré "Microsoft Internet Controls et entré
les lignes suivantes
Dim objIntExpl As Object
Set objIntExpl = CreateObject
("InternetExplorer.Application")

Je manque de doc sur l'utilisation de ces controles...
Merci pour votre aide
@+