0

やりたいこと:

Winactorによって、csvファイルを読んで、取得した項目を引数として、マクロへ渡す。

実行時、下記のエラーが発生しました。

スクリプトの実行に失敗しました。

エラー番号:0x000003ec

内容:プログラミングによるVisual Basic プロジェクトへのアクセスは信頼性に欠けます

お手数ですが、ご確認お願いいたします。

詳細な設定は下記のを参照してください。

CSVから読んだ項目

金額、税前金額

2980,3400

Excel操作の設定

ファイル名:値⇒ E:\study\Rpa\ExcelTest.xlsm

マクロ名:値⇒insert_Click

引数:値⇒%金額%,%税前金額%

マクロのソース

Sub insert_Click(parm1 As Integer, parm2 As Integer)
Dim Name As String
Dim Mypath As String
Dim Savefile As String
Dim Ss As String

Name = "RpaTest"

Mypath = ThisWorkbook.Path

Savefile = Mypath & "\" & Name & ".txt"

Ss = "This is a Test " & parm1 & parm2

Open Savefile For Output As #1
Print #1, Ss
Close #1
End Sub

イケメン 回答した質問
回答とコメントは、会員登録(無料)で閲覧できるようになります。