macros - qtp でマクロ スクリプトを呼び出し、そのマクロ スクリプトを Excel で実行する方法

Question

Excelに記録してマクロスクリプトを作成しました。QTP (Vb script) を介して、新しく開いた Excel でこのマクロ スクリプトを実行する必要があります。このマクロ スクリプトを Excel で実行するには、qtp でどの呼び出し関数を使用できますか? 私のマクロスクリプトは

Sub csi()
    ' csi Macro
    ' Keyboard Shortcut: Ctrl+c
    ActiveCell.FormulaR1C1 = "test test test "
    Range("B1").Select
End Sub

Answer 1

同様の質問への回答として説明されているように、それほど難しくありません。

Set objExcel = CreateObject("Excel.Application")
objExcel.Application.Run "test.xls!csi"

また

objExcel.Application.Run "test.xls!sheet1.csi"

マクロが に存在するmoduleか、 に存在するかによって異なりますsheet。