Ouvrire une nouvelle page IE.

tintin92 · 2 Mars 2006

Bonjour,

J'ai une feuille avec deux colonnes, une colonne Titre et une colonne Auteur.

Je souhaiterai lorsque je clique sur un lien hypertexte ( ou autre chose ) que XL ouvre une nouvelle page IE en ouvrant la page de recherche détaillé d'Amazon.fr et qu'il remplisse automatiquement les champs titre et auteur.
Ou qu'XL ouvre directement la page d'Amazon correspondant au livre.
Qu'y a-t-il de réalisable dans ce que je cherche à faire.

Merci.

Tintin92

Adeus33 · 2 Mars 2006

Bonjour tintin92

Voici le code que j'utilise mon appli.

Je rentre l'adresse internet dans ma combobox
puis j'applique le code suivant.

Code:

Dim IE As Object
    Dim addresseinternet As String

    Set IE = CreateObject('InternetExplorer.Application')
    addresseinternet = ActiveSheet.ComboBox1.Value

    IE.Navigate addresseinternet
    IE.AddressBar = True
    IE.Menubar = True
    IE.Toolbar = True
    IE.Width = 800
    IE.Height = 600
    IE.Resizable = True
    IE.Visible = True
    Set IE = Nothing

Ensuite pour aller taper dans la page web je sais pas si c'est possible, je suis pas assez fort en excel pour ca.

Bon courage

Ouvrire une nouvelle page IE.

tintin92

XLDnaute Nouveau

Adeus33

XLDnaute Occasionnel

Discussions similaires