r - RDCOMClient で Excel モジュール .bas をインポートして実行する

Question

RDCOMClientを使用して、モジュールを Excel ワークブックにインポートしようとしています。

xlApp <- COMCreate("Excel.Application")
XlWbk <- xlApp$Workbooks()$Open(paste0(root, "test.xlsx"))
xlWbk.VBProject.VBComponents.Import(paste0(root, "macro/Module1.bas"))

最後の行でエラーが発生します。

 could not find function "xlWbk.VBProject.VBComponents.Import"

私も次のことを試しました：

xlApp$Run(paste0(root, "macro/Module1.bas!header"))
xlApp$Modules()$AddFromFile(paste0(root, "macro/Module1.bas"))

上記のコードはどちらも機能しませんでした。

このモジュールのインポートを手伝ってくれる人はいますか? 私はこの Excel マクロをRで生成します。それらをコピーして Excel ドキュメントに貼り付け、手動でマクロを実行するのは本当に面倒です。

編集 - - - - -

これが.basの内容です

Attribute VB_Name = "Module1"
Sub Macro2()
Attribute Macro2.VB_ProcData.VB_Invoke_Func = " \n14"
'
' Macro2 Macro
'
    Range("I6").Select
    ActiveCell.FormulaR1C1 = "hello"
    Range("I7").Select
End Sub