google et chrome vba
Le
shillow
je te remercie mais je voudrais aussi renseigner du texte sur cette page web
avec le contenu de la cellule se trouvant en A1
voila mon code et la page a ouvrir
Declare Function GetSystemMetrics32 Lib "user32" Alias "GetSystemMetrics"
(ByVal nIndex As Long) As Long
Sub Site()
ThisWorkbook.FollowHyperlink
"http://paris-a-la-carte-version-pl....ing", , True
Application.Wait (Now + TimeValue("0:00:05"))
End Sub
Je voudrais donc quue le code me rappatrie le contenu de ma cellule a1
est ce possible?
merci d'avance
"Mgr T. Banni" <banni@lacurie.va> a écrit dans le message de news:
e4lolIRkKHA.6096@TK2MSFTNGP02.phx.gbl
> suite
> chez moi et donc à adapter :
>
> Shell "C:\Documents and Settings\jean-paul\Local Settings\Application
> Data\Google\Chrome\Application\chrome.exe", 1
>
> tout sur une seule ligne.
> T.B.
>
> "shillow" <stephol@prodiag.fr> a écrit dans le message de news:
> %23IZB%23ARkKHA.3792@TK2MSFTNGP02.phx.gbl
>> Bonjour,
>>
>> Connaissez vous le code en vba qui permette d'ouvri google chrome et non
>> IE7?
>>
>> merci par avance
>>
>> shillow
>>
>
avec le contenu de la cellule se trouvant en A1
voila mon code et la page a ouvrir
Declare Function GetSystemMetrics32 Lib "user32" Alias "GetSystemMetrics"
(ByVal nIndex As Long) As Long
Sub Site()
ThisWorkbook.FollowHyperlink
"http://paris-a-la-carte-version-pl....ing", , True
Application.Wait (Now + TimeValue("0:00:05"))
End Sub
Je voudrais donc quue le code me rappatrie le contenu de ma cellule a1
est ce possible?
merci d'avance
"Mgr T. Banni" <banni@lacurie.va> a écrit dans le message de news:
e4lolIRkKHA.6096@TK2MSFTNGP02.phx.gbl
> suite
> chez moi et donc à adapter :
>
> Shell "C:\Documents and Settings\jean-paul\Local Settings\Application
> Data\Google\Chrome\Application\chrome.exe", 1
>
> tout sur une seule ligne.
> T.B.
>
> "shillow" <stephol@prodiag.fr> a écrit dans le message de news:
> %23IZB%23ARkKHA.3792@TK2MSFTNGP02.phx.gbl
>> Bonjour,
>>
>> Connaissez vous le code en vba qui permette d'ouvri google chrome et non
>> IE7?
>>
>> merci par avance
>>
>> shillow
>>
>
Poser une question
ouèbe littéraire, un peu de latin tout au plus
mais il y a ici des spécialistes des scripts mais encore auront-ils besoin
de savoir où tu veux coller dans ta page web le contenu de ta cellule A1....
attendons la réaction des grands chefs 4 plumes
Mgr T.B.
"shillow"
Jacques, très impatient.
--
Bien amicalmement,
"Le vin est au repas ce que le parfum est à la femme."
Jacquouille.
"Mgr T. Banni" %
En fait je voudrais copier le contenu de la cellule A1 de excel vers ma page
web
"http://paris-a-la-carte-version-pl....to/mapping
et que ensuite il click tout seul sur le bouton rechercher se trouvant sur
la page web.
"shillow"
je vois bien ce que tu veux faire et je sais juste que pour faire cela, il
te faut un écrire un fichier .vbs dont les premières lignes pourraient être
:
Set ie = CreateObject("internetexplorer.application")
ie.Navigate ("http://paris-a-la-carte-version-pl....ping")
Do While IE.ReadyState <> 4
Loop
with ie
.Top = 0
.Left = 0
.Visible = True: IE.Top = 0: IE.Left = 0: IE.Width = "1050": IE.Height =
"800"
' .FullScreen = True 'Plein écran Si désiré
End with
c'est ensuite que ça devient compliqué selon la structure de la page Web
tu dois sûrement avoir des exemples de scripts (ce sont ces fichiers .vbs)
sur la toile
sache seulement qu'un script s'écrit dans Notepad et qu'il te suffit de
modifier l'extension .txt en .vbs
c'est toute l'aide divine que je peux t'apporter
par contre, si tu as des pneus neige d'occas', ça m'intéresse :-)
Mgr T.B.
"shillow"
Je ne sais pas ce que tu souhaites faire, mais la code ci-dessous te
permet de renseigner automatique le champ, et de cliquer sur le bouton
rechercher.
Comme la page est bourrée de javascript, j'a