Excel VBAを使用してIEでナビゲートするIDで

Question

問題：Excelから情報をコピーしてWebページに貼り付け、プッシュボタンを押してみようとしています。最終的には、PDFをフォルダに印刷させるために、これをすべて取得する必要があります。私は以下のコードを試しましたが、なぜそれが動作していないのか完全にわかりません。 Googleが解決しなかった

ウェブサイト：https://www.easymapmaker.com/advanced

未遂コード：へ

Set Address = IE.Document.getElementsByID("sourceData") 
Address.Value = AddressGrid 

：

今

IE.Document.getElementByID("sourceData").Value = AddressGrid 

Sub MapMacro() 

    AddressGrid = Range("A1").Value 

    Set IE = CreateObject("InternetExplorer.Application") 
    WebSite = "https://www.easymapmaker.com/advanced" 
    With IE 
     .Visible = True 
     .navigate WebSite 

    Do While IE.Busy Or IE.readyState <> 4 
     DoEvents 
    Loop 
    On Error Resume Next 'This is here in case fields cant be found. 

    Set Address = IE.Document.getElementsByID("sourceData") 
    Address.Value = AddressGrid 


    Set Element = IE.Document.getElementsByID("optionButton") 
    Element.Click 

    Do While IE.Busy Or IE.readyState <> 4 
     DoEvents 
    Loop 
    End With 

End Sub 

Answer 1

明確にするために、私はラインを変更することで、この作業を得ました、sinc 「：D4 A1は、」あ​​なたがこの方法を試みることができる：E AddressGridは一つだけのセルを参照しているが、あなたは範囲をしたい、と言う

Dim clipTXT As MSForms.DataObject 
Range("A1:D4").Copy 

Set clipTXT = New MSForms.DataObject 
    clipTXT.GetFromClipboard 
IE.Document.getElementByID("sourceData").Value = clipTXT.GetTxt