Excel宏可以将命令行的输出直接拉入工作表吗?

时间:2013-04-26 15:29:34

标签: excel vba cmd

我有一个VBA宏,它执行命令行功能来创建列出目录中文件的文本文件;但是,不是将列表从文本文件复制并粘贴/导入到工作表,而是可以直接将命令行的putput直接传递到工作表中吗?

我正在使用的VBA代码创建文件是:

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

我非常感谢这方面的任何想法!

1 个答案:

答案 0 :(得分:0)

您可以使用this class将其保存为字符串变量。 (直接下载链接here。)

以下是一个示例用法:

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

从那里,您可以直接将其输出到工作表。