如何用VBA提取WIN7任务管理器中的应用程序列表

你的VBA是什么环境，下面的VBA在EXCEL里面执行，执行后A:C两列存放进程情况：

Option Explicit

Sub a()

    Dim objs, obj, i

    Columns("a:c").Clear

    Set objs = GetObject("WinMgmts:").InstancesOf("Win32_Process")

    For Each obj In objs

        i = i + 1

        Cells(i, 1) = obj.Name

        Cells(i, 2) = obj.Description

        Cells(i, 3) = obj.ExecutablePath

    Next

End Sub

windows下，进入cmd，使用命令wmic product >installedSoftware.txt可将已安装程序列表保存在文件installedSoftware.txt中，当前目录中。

在Debian 或 Ubuntu linux下，进入终端，使用命令dpkg--list >installedPackege.txt可以将已安装的包的列表保存在文件installedPackege.txt中

---