0

コマンド ライン関数を実行して、ディレクトリ内のファイルを一覧表示するテキスト ファイルを作成する VBA マクロがあります。ただし、リストをテキスト ファイルからワークシートにコピー アンド ペースト/インポートする代わりに、コマンド ラインの putput をワークシートに直接渡すことは可能ですか?

ファイルを作成するために現在作業しているVBAコードは次のとおりです。

CMD = "DIR /A:-D-H /O:-D-G /B \\directory\* > \\sleuth.txt"
Shell "cmd.exe /c " & CMD

この面でのアイデアに感謝します！

4

1 に答える 1

0

このクラスを使用して文字列変数に保存できます。(直接ダウンロードリンクはこちら.)

使用例を次に示します。

Sub Test()
    Dim cls As New clsRunApp
    Dim s As String
    cls.command = "cmd.exe /k dir"

    s = cls.RunAppWait_CaptureOutput
    Set cls = Nothing
    MsgBox (s)
End Sub

そこから、ワークシートに直接出力できます。

于 2014-01-27T19:22:18.127 に答える