VBからエクセルを起動して引数を渡し方は？ (ID:118746)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すいません、エクセルマクロ側のソースを忘れました。 Option Explicit Sub READ_TextFile() Dim APP As Application ' Applicationオブジェクト Dim s_FILENAME As String ' ファイル名 Dim s_REC As String ' 読み込んだレコード内容 Dim GYO As Long ' セルの行 Dim freenum As Integer Dim flg As Integer 'フラグ Dim i As Integer Dim j As Integer Range("A1").Select With ActiveSheet.QueryTables.Add(Connection:="TEXT;指定したcsvファイル名", _ Destination:=Range("A1")) .Name = "NITC" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .RefreshStyle = xlInsertDeleteCells '以下、処理続く・・・。 よろしくお願いします。