LibreOfficeCalcでセル内容をIE上の入力窓に入力したい

Question

はじめまして！

LibreOfficeCalcでセルに入力されたURLの一覧から、自動でIEを起動して特定のサイトでURLを調査するシステムを作っています。
本来はaguse等のURL調査サイトで入力する予定なのですが、google検索でテストをしていてどうしてもうまくいかず、こちらに質問させて頂きました。
サイトのソースから、フォームの名前は「f」、入力欄の名前は「q」と確認できたので、下記のようなコードを作ったのですが、エラーメッセージの解決方法が分からず困っています。
当方、VBAをちょっとかじったくらいでプログラムは初心者です。

宜しくお願いします！

発生している問題・エラーメッセージ

BASICランタイムエラー'1'
Type:com.sun.star.lang.IllegalArgmentException
Message:[automation bridge]The object does not have a functionor readable property "q

該当のソースコード

Option VBASupport 1
Sub Submit()

Dim Doc As Object
Dim Sheet As Object
Dim SendURL As String
Dim IE As Object

Doc = ThisComponent
Sheet = Doc.Sheets(0)
SendURL = Sheet.getCellByPosition(0,2).String

IE = createObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate ("https://www.google.co.jp/")
Do While IE.Busy = True Or IE.readyState < 4
	DoEvents
Loop
If IE.LocationURL = ("https://www.google.co.jp/") Then
	IE.Document.f.q.value = SendURL
End If
End Sub

試したこと

指定している入力欄が間違っている（ソースの確認ミス）かとも思ったので、「IE.Document.f.q.value」の部分を変更してみましたが、そういうことではないようで。
「com.sun.star.lang.IllegalArgmentException」というものを使わないとダメですよ、と言われている気がするのですが、どのようにしたら使えるのかが分かりません．．．

補足情報（FW/ツールのバージョンなど）

使用言語はLibreOffice Basic 6.1.0.3です。

Answer 1

Dim Doc As Object
Dim Sheet As Object
Dim SendURL As String
Dim IE As Object

Doc = ThisComponent
Sheet = Doc.Sheets(0)
SendURL = Sheet.getCellByPosition(0,2).String

IE = createObject("InternetExplorer.Application")
IE.Visible = True
IE.navigate SendURL

Do While IE.Busy = True Or IE.readyState < 4
	DoEvents

Loop
If IE.LocationURL = ("https://www.google.com.br") Then
	IE.Document.f.q.value = SendURL
End If

IE.Quit
End Sub
コード