你见过打开Excel的同时打开QQ吗？或者打开其他应用程序或文件！怎么实现？Follow me！ 输入如下代码：   Private Sub Workbook_Open()    AppActivate (Shell("D:\Program Files\Tencent\QQ\Bin\QQ.exe")) ‘本例中QQ的安装位置！其他程序位置请自行修改~    End&