Chrome web de form doldurma

[excellkurdu]

Merhaba Arkadaşlar,
Excel sayfamdaki hücre değerlerinin chrome web de bir forma aktarmak istiyorum.
chrome web örnek çalışma bulamadım. Aynı zamanda hücreleri açılır sayfa ve seçmelidir. Varsa örnek çalışma verirseniz sevinirim.
İstediğim Aşağıdaki kırmızı yerlere nasıl kod yazmalıyım? Görüntü ekranı ektedir

Sub Google_Chrome ()
    Dim Yol As String
    Yol = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
    Shell (Yol & " -url http://biyosidaluygulama.thsk.gov.tr/Application/Create"), vbMaximizedFocus
        Application.Wait Now + TimeValue("00:00:03")
[COLOR="Red"]        SendKeys "adress"
        SendKeys "{ENTER}"[/COLOR]
End Sub

Örnek veremiyorum şifreli site (özelden şifremi verebilirim). Kendi şifremle siteyi açtıktan sonra, Uygulama Yapılacak Adres kısmına "ortahisar Trabzon", A3 deki "TRABZON" değeri İl kısmına, İLÇE KISMINA B3 deki "ARSİN" değeri atanmalı. bu şekilde devam edip girmeli. Belki işe yarar web den bir tane örnek id yazdım.
Uygulama Yapılacak Adres id="Adress"
http://biyosidaluygulama.thsk.gov.tr/Application/List

 

[excellkurdu]

Arkadaşlar zor soru mu sordum bilmiyorum. Örnek varsa link verebilir misiniz? Şimdiden teşekkür ederim.

 

[systran]

AutoHotKey programını denediniz mi?
https://autohotkey.com/board/topic/44040-tutorial-for-newbies/ (Tutorial)
https://autohotkey.com/board/topic/83208-copy-excel-cell-and-paste-and-submit-in-chrome-web-form/ (Excel <-> chrome tutorial)

 

[excellkurdu]

AutoHotKey programını denediniz mi?
https://autohotkey.com/board/topic/44040-tutorial-for-newbies/ (Tutorial)
https://autohotkey.com/board/topic/83208-copy-excel-cell-and-paste-and-submit-in-chrome-web-form/ (Excel <-> chrome tutorial)

Hocam yanıtınız için teşekkür ederim.
Mesajınızdan sonra ilk defa AutoHotKey i tanıdım. Dünden beri öğrenmeye çalışıyorum. Explorer de açmak ve yazdırmak kodunu buldum. Fakat Chroma ya uyarlayamadım.
Explorer de açan ve yazdıran kod:

site := "deneme"
run := ComObjCreate("InternetExplorer.Application") ;create a IE instance
run.Visible := True
run.Navigate("Google.com")
while, run.ReadyState != 4
   Sleep, 10
run.Document.All.q.Value := site
sleep, 500
run.Document.All.btnG.Click()

Chroma açan kod da bu:

run_0:="C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
run_1:="Google.com"
Loop, 1
   Run, % run_0 " " run_%a_index%

Fakat iki kodu bir araya getiremedim. Bu konuda yardımcı olabilir misiniz? Eğer bunu başarabilirsek aynı kodu excel dosyama uygulayacağım.