Name属性[SearchKey1]へ検索名を入力する

IEで 検索するためにキーワードとなる言葉を入力する場合に、
以下のような記述をする。

＜サンプル＞
    Const myAns As String = "xxx"
　　Dim HTMLDoc As HTMLDocument
   
    Set HTMLDoc = ie.document
   
    'Name属性[SearchKey]へ検索名を入力する
    HTMLDoc.getElementsByName("SearchKey")(0).Value = myAns