Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 517560ceb002475f…

MALICIOUS

Office (OOXML)

16.8 KB Created: 2021-02-26 10:57:37 UTC Authoring application: Microsoft Excel 16.0300 First seen: 2022-06-20
MD5: 8cd388efe5116d65aa1804ef317fc1e8 SHA-1: 102f4d05d4c2fd9d3415ccf861cb5c87468a6fa4 SHA-256: 517560ceb002475fe9137e4c1ad1e7b32119e886e268f52551824f0cca05f6df
168 Risk Score

Heuristics 5

  • VBA project inside OOXML medium 4 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
    cmdResult = Shell("cmd.exe /k " & strPath, vbNormalFocus)
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
    Set fso = CreateObject("Scripting.FileSystemObject")
  • cmd.exe reference in VBA high OLE_VBA_CMD
    cmd.exe reference in VBA
    Matched line in script
    cmdResult = Shell("cmd.exe /k " & strPath, vbNormalFocus)
  • Workbook_Open macro low OLE_VBA_WBOPEN
    Workbook_Open macro
    Matched line in script
    Sub Workbook_Open()

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) 1618 bytes
SHA-256: 36661c2e8c2556b98c6523ed76b76fa9dedb3a7211369c78a378d10ea2cc2a4b
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
Sub Workbook_Open()

' This is the virus (test!!!)
Dim EicarVirusString As String
EicarVirusString = "X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*"

' Create some filesystem objects
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")

' Get TEMP folder location
TempFolder = fso.GetSpecialFolder(2)

' Create the file
strPath = TempFolder & "\eicar.com"
Dim oFile As Object
Set oFile = fso.CreateTextFile(strPath)

' Write the payload
oFile.Write EicarVirusString

' Close and cleanup
oFile.Close
Set fso = Nothing
Set oFile = Nothing

' Show warning
result = MsgBox("Hello, I have just created a test virus in your temp directory (" & strPath & "), and am about to run it. Just click OK and enjoy. You shoud either see a text message stating that EICAR has run, or (and that is intended) it should be deleted by your virus scanner.", vbCritical, "Test Virus Saved")
cmdResult = Shell("cmd.exe /k " & strPath, vbNormalFocus)


End Sub
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 10752 bytes
SHA-256: 57ca7ed64d6f82ab73462db57b08f6e3f2690d4550579809a808e488e807b5dc

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