Function at 0x4359e5
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x405606
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x14c
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x402180
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 3
movsx eax, word [0x476124]
test eax, eax
jne 0x435d81
mov dword [ebp - 4], 4
mov eax, dword [ebp + 0xc]
mov ax, word [eax]
mov word [ebp - 0x104], ax
movsx eax, word [ebp - 0x104]
mov dword [ebp - 0x130], eax
cmp dword [ebp - 0x130], 3
je 0x435a8f
cmp dword [ebp - 0x130], 4
je 0x435b27
jmp 0x435d81
mov dword [ebp - 4], 6
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x19b
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x476170]
mov ecx, 0x124
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449cdd
movsx eax, ax
sub eax, 7
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf4], ax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x435b22
jmp 0x4370ee
jmp 0x435d81
mov dword [ebp - 4], 0xa
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x19e
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x9c]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x9c]
push eax
push 0x19f
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x9c]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x3c]
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x50]
push eax
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 6
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x1c
mov dword [ebp - 4], 0xb
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x1a0
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x30]
push dword [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0xc
mov dword [ebp - 0x6c], 0x100
mov dword [ebp - 0x74], 3
and dword [ebp - 0x5c], 0
mov dword [ebp - 0x64], 3
mov dword [ebp - 0xa4], 0x476124
mov dword [ebp - 0xac], 0x400b
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0x84]
push eax
call sub.MSVBVM60.DLL_rtcImmediateIf
mov dword [ebp - 0xd4], 0x24
mov dword [ebp - 0xdc], 3
push dword [0x476160]
lea eax, [ebp - 0xdc]
push eax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x94]
push eax
call sub.MSVBVM60.DLL___vbaVarOr
push eax
call sub.MSVBVM60.DLL___vbaI2Var
push eax
push dword [ebp - 0x30]
call fcn.00449cdd
movsx eax, ax
sub eax, 7
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf4], ax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x64]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x435d81
jmp 0x4370ee
mov dword [ebp - 4], 0x11
call fcn.0044d84c
movsx eax, ax
test eax, eax
je 0x435da2
mov dword [ebp - 4], 0x12
call fcn.0044cfe6
jmp 0x435d81
mov dword [ebp - 4], 0x14
call sub.MSVBVM60.DLL___vbaFileCloseAll
mov dword [ebp - 4], 0x15
mov dword [ebp - 0xa4], 0x4761e4
mov dword [ebp - 0xac], 0x4008
lea eax, [ebp - 0xac]
push eax
call sub.MSVBVM60.DLL_rtcKillFiles
mov dword [ebp - 4], 0x16
cmp word [0x4761d8], 0
jle 0x435e2b
mov dword [ebp - 4], 0x17
mov ax, word [0x4761d8]
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x18
push dword [0x4761e0]
push 0x40e6e0
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x5c], eax
mov dword [ebp - 0x64], 8
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcKillFiles
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1a
mov eax, dword [ebp + 8]
mov eax, dword [eax]
mov dword [ebp - 0xf4], eax
lea eax, [ebp - 0xe4]
push eax
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x58]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x435e86
push 0x58
push 0x410ae4
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x134], eax
jmp 0x435e8d
and dword [ebp - 0x134], 0
cmp dword [0x476010], 0
jne 0x435eb1
push 0x476010
push 0x408d2c
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x138], 0x476010
jmp 0x435ebb
mov dword [ebp - 0x138], 0x476010
mov eax, dword [ebp - 0x138]
mov eax, dword [eax]
mov dword [ebp - 0xfc], eax
lea eax, [ebp - 0xe8]
push eax
mov eax, dword [ebp - 0xfc]
mov eax, dword [eax]
push dword [ebp - 0xfc]
call dword [eax + 0x58]
fnclex
mov dword [ebp - 0x100], eax
cmp dword [ebp - 0x100], 0
jge 0x435f12
push 0x58
push 0x40f3ac
push dword [ebp - 0xfc]
push dword [ebp - 0x100]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x13c], eax
jmp 0x435f19
and dword [ebp - 0x13c], 0
mov eax, dword [ebp - 0xe4]
cmp eax, dword [ebp - 0xe8]
je 0x435fce
mov dword [ebp - 4], 0x1b
cmp dword [0x4778b0], 0
jne 0x435f56
push 0x4778b0
push 0x411764
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x140], 0x4778b0
jmp 0x435f60
mov dword [ebp - 0x140], 0x4778b0
mov eax, dword [ebp - 0x140]
mov eax, dword [eax]
mov dword [ebp - 0xf4], eax
mov eax, dword [ebp + 8]
push dword [eax]
lea eax, [ebp - 0x54]
push eax
call sub.MSVBVM60.DLL___vbaObjSetAddref
push eax
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x10]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x435fbf
push 0x10
push 0x411754
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x144], eax
jmp 0x435fc6
and dword [ebp - 0x144], 0
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x1d
cmp dword [0x476010], 0
jne 0x435ff9
push 0x476010
push 0x408d2c
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x148], 0x476010
jmp 0x436003
mov dword [ebp - 0x148], 0x476010
mov eax, dword [ebp - 0x148]
mov eax, dword [eax]
mov dword [ebp - 0xf4], eax
lea eax, [ebp - 0xe0]
push eax
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x1b8]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x436060
push 0x1b8
push 0x40f3ac
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x14c], eax
jmp 0x436067
and dword [ebp - 0x14c], 0
movsx eax, word [ebp - 0xe0]
test eax, eax
je 0x436108
mov dword [ebp - 4], 0x1e
cmp dword [0x476010], 0
jne 0x4360a1
push 0x476010
push 0x408d2c
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x150], 0x476010
jmp 0x4360ab
mov dword [ebp - 0x150], 0x476010
mov eax, dword [ebp - 0x150]
mov eax, dword [eax]
mov dword [ebp - 0xf4], eax
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x2a8]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x436101
push 0x2a8
push 0x40f3ac
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x154], eax
jmp 0x436108
and dword [ebp - 0x154], 0
mov dword [ebp - 4], 0x20
mov eax, dword [ebp + 0xc]
mov ax, word [eax]
mov word [ebp - 0x108], ax
movsx eax, word [ebp - 0x108]
mov dword [ebp - 0x158], eax
cmp dword [ebp - 0x158], 3
jl 0x4367e0
cmp dword [ebp - 0x158], 4
jle 0x436163
cmp dword [ebp - 0x158], 5
je 0x436343
cmp dword [ebp - 0x158], 6
je 0x436426
jmp 0x4367e0
mov dword [ebp - 4], 0x22
and word [0x47611c], 0
mov dword [ebp - 4], 0x23
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa4], 0x410b6c
mov dword [ebp - 0xac], 8
lea esi, [ebp - 0xac]
push 0
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb4], 0x476168
mov dword [ebp - 0xbc], 0x4008
lea esi, [ebp - 0xbc]
push 1
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x98]
push eax
push 0x19c
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x9c]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xc4], 0x410b6c
mov dword [ebp - 0xcc], 8
lea esi, [ebp - 0xcc]
push 0
push dword [ebp - 0x9c]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xd4], 0x476168
mov dword [ebp - 0xdc], 0x4008
lea esi, [ebp - 0xdc]
push 1
push dword [ebp - 0x9c]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x9c]
push eax
push 0x19d
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x9c]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x3c]
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x24
push dword [0x476170]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x30]
call fcn.00449cdd
jmp 0x4369ac
mov dword [ebp - 4], 0x26
and word [0x47611c], 0
mov dword [ebp - 4], 0x27
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa4], 0x410b6c
mov dword [ebp - 0xac], 8
lea esi, [ebp - 0xac]
push 0
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb4], 0x476168
mov dword [ebp - 0xbc], 0x4008
lea esi, [ebp - 0xbc]
push 1
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x98]
push eax
push 0x1a2
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push 1
push dword [0x476170]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449430
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x4369ac
mov dword [ebp - 4], 0x29
or word [0x47611c], 0xffff
mov dword [ebp - 4], 0x2a
or word [0x476126], 0xffff
mov dword [ebp - 4], 0x2b
push 0x4120e4
push 0x410fb0
push dword [0x47602c]
call fcn.0043b0f0
mov edx, eax
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2c
lea eax, [ebp - 0x24]
mov dword [ebp - 0xa4], eax
mov dword [ebp - 0xac], 0x4008
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
mov dword [ebp - 0xb4], 0x410ac4
mov dword [ebp - 0xbc], 8
lea edx, [ebp - 0xbc]
lea ecx, [ebp - 0x74]
call sub.MSVBVM60.DLL___vbaVarDup
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x84]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x84]
push eax
call sub.MSVBVM60.DLL___vbaVarTextTstEq
mov word [ebp - 0xf4], ax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x74]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x436512
mov dword [ebp - 4], 0x2d
call fcn.00469833
jmp 0x43674c
mov dword [ebp - 4], 0x2e
lea eax, [ebp - 0x24]
mov dword [ebp - 0xa4], eax
mov dword [ebp - 0xac], 0x4008
lea eax, [ebp - 0xac]
push eax
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
mov dword [ebp - 0xb4], 0x412100
mov dword [ebp - 0xbc], 8
lea edx, [ebp - 0xbc]
lea ecx, [ebp - 0x74]
call sub.MSVBVM60.DLL___vbaVarDup
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x84]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x84]
push eax
call sub.MSVBVM60.DLL___vbaVarTextTstEq
mov word [ebp - 0xf4], ax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x74]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x43667f
mov dword [ebp - 4], 0x2f
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa4], 0x410b6c
mov dword [ebp - 0xac], 8
lea esi, [ebp - 0xac]
push 0
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb4], 0x476168
mov dword [ebp - 0xbc], 0x4008
lea esi, [ebp - 0xbc]
push 1
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x98]
push eax
push 0x1a1
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x476170]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449a40
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x43674c
mov dword [ebp - 4], 0x31
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa4], 0x410b6c
mov dword [ebp - 0xac], 8
lea esi, [ebp - 0xac]
push 0
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb4], 0x476168
mov dword [ebp - 0xbc], 0x4008
lea esi, [ebp - 0xbc]
push 1
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x98]
push eax
push 0x1a1
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x476170]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449a40
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x33
call fcn.00448b4e
movsx eax, ax
test eax, eax
je 0x4367db
mov dword [ebp - 4], 0x34
or word [0x476126], 0xffff
mov dword [ebp - 4], 0x35
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x201
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x476170]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449cdd
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x4369ac
mov dword [ebp - 4], 0x38
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa4], 0x410b6c
mov dword [ebp - 0xac], 8
lea esi, [ebp - 0xac]
push 0
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb4], 0x476168
mov dword [ebp - 0xbc], 0x4008
lea esi, [ebp - 0xbc]
push 1
push dword [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x98]
push eax
push 0x19c
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x9c]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xc4], 0x410b6c
mov dword [ebp - 0xcc], 8
lea esi, [ebp - 0xcc]
push 0
push dword [ebp - 0x9c]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xd4], 0x476168
mov dword [ebp - 0xdc], 0x4008
lea esi, [ebp - 0xdc]
push 1
push dword [ebp - 0x9c]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x9c]
push eax
push 0x19d
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x9c]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x3c]
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x39
push dword [0x476170]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x30]
call fcn.00449cdd
mov dword [ebp - 4], 0x3b
call fcn.0044d0ae
mov dword [ebp - 4], 0x3c
mov eax, dword [ebp + 0xc]
cmp word [eax], 6
jne 0x436c20
mov dword [ebp - 4], 0x3d
mov edx, 0x4120b0
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrCopy
mov edx, 0x41203c
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2c]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 0x80000002
call fcn.0045855f
mov word [ebp - 0xf4], ax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x436c1b
mov dword [ebp - 4], 0x3e
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x203
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 0x7c], 0x80020004
mov dword [ebp - 0x84], 0xa
mov dword [ebp - 0x6c], 0x80020004
mov dword [ebp - 0x74], 0xa
mov dword [ebp - 0xa4], 0x476170
mov dword [ebp - 0xac], 0x4008
mov eax, dword [ebp - 0x3c]
mov dword [ebp - 0x124], eax
and dword [ebp - 0x3c], 0
mov eax, dword [ebp - 0x124]
mov dword [ebp - 0x5c], eax
mov dword [ebp - 0x64], 8
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0xac]
push eax
push 0x44
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcMsgBox
sub eax, 6
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf4], ax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x64]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x436b2c
mov dword [ebp - 4], 0x3f
or word [ebp - 0x38], 0xffff
jmp 0x436c1b
mov dword [ebp - 4], 0x41
and word [ebp - 0x38], 0
mov dword [ebp - 4], 0x42
mov eax, dword [ebp + 0xc]
mov word [eax], 5
mov dword [ebp - 4], 0x43
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x204
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 0x7c], 0x80020004
mov dword [ebp - 0x84], 0xa
mov dword [ebp - 0x6c], 0x80020004
mov dword [ebp - 0x74], 0xa
mov dword [ebp - 0xa4], 0x476170
mov dword [ebp - 0xac], 0x4008
mov eax, dword [ebp - 0x3c]
mov dword [ebp - 0x128], eax
and dword [ebp - 0x3c], 0
mov eax, dword [ebp - 0x128]
mov dword [ebp - 0x5c], eax
mov dword [ebp - 0x64], 8
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0xac]
push eax
push 0x30
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcMsgBox
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x64]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
jmp 0x436f97
mov dword [ebp - 4], 0x47
push dword [0x4761bc]
push 0x40e8ac
call sub.MSVBVM60.DLL___vbaStrTextCmp
test eax, eax
je 0x436f97
mov dword [ebp - 4], 0x48
mov eax, dword [ebp + 0xc]
mov ax, word [eax]
mov word [ebp - 0x10c], ax
movsx eax, word [ebp - 0x10c]
mov dword [ebp - 0x15c], eax
cmp dword [ebp - 0x15c], 3
je 0x436c8e
cmp dword [ebp - 0x15c], 4
je 0x436c9d
cmp dword [ebp - 0x15c], 5
je 0x436c7f
jmp 0x436cac
mov dword [ebp - 4], 0x4a
mov word [ebp - 0x28], 1
jmp 0x436cb9
mov dword [ebp - 4], 0x4c
mov word [ebp - 0x28], 3
jmp 0x436cb9
mov dword [ebp - 4], 0x4e
mov word [ebp - 0x28], 2
jmp 0x436cb9
mov dword [ebp - 4], 0x50
mov word [ebp - 0x28], 1
mov dword [ebp - 4], 0x52
or word [0x476126], 0xffff
mov dword [ebp - 4], 0x53
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x7de
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x476170]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x3c]
call fcn.00449a40
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x54
call sub.MSVBVM60.DLL_rtcErrObj
push eax
lea eax, [ebp - 0x54]
push eax
call sub.MSVBVM60.DLL___vbaObjSet
mov dword [ebp - 0xf4], eax
push 0
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x20]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x436d95
push 0x20
push 0x411db4
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x160], eax
jmp 0x436d9c
and dword [ebp - 0x160], 0
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x55
movsx eax, word [0x47610c]
test eax, eax
je 0x436dcd
mov dword [ebp - 4], 0x56
mov edx, dword [0x476110]
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrCopy
jmp 0x436dde
mov dword [ebp - 4], 0x58
xor edx, edx
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0x5a
or word [ebp - 0xe0], 0xffff
mov eax, dword [0x4761b8]
mov dword [ebp - 0xa4], eax
mov dword [ebp - 0xac], 8
lea eax, [ebp - 0xe0]
push eax
push dword [ebp - 0x28]
mov ax, word [0x476114]
push eax
push dword [ebp - 0x34]
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0xac]
mov edi, esp
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
push dword [0x4761bc]
lea eax, [ebp - 0x64]
push eax
call fcn.00437e87
push 1
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcShell
fstp qword [ebp - 0xf0]
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x5b
call sub.MSVBVM60.DLL_rtcErrObj
mov dword [ebp - 0x5c], eax
mov dword [ebp - 0x64], 9
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL___vbaBoolVarNull
mov word [ebp - 0xf4], ax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xf4]
test eax, eax
je 0x436f97
mov dword [ebp - 4], 0x5c
mov dword [ebp - 0x5c], 0x80020004
mov dword [ebp - 0x64], 0xa
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcBstrFromError
mov edx, eax
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x98]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x98]
push eax
push 0x7dd
call fcn.004477ad
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0x12c], eax
and dword [ebp - 0x50], 0
push 1
push dword [0x476170]
push 0x30
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
mov edx, dword [ebp - 0x12c]
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x411740
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call fcn.00449430
lea eax, [ebp - 0x50]
push eax
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
push 6
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x1c
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x60
cmp dword [0x4778b0], 0
jne 0x436fc2
push 0x4778b0
push 0x411764
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x164], 0x4778b0
jmp 0x436fcc
mov dword [ebp - 0x164], 0x4778b0
mov eax, dword [ebp - 0x164]
mov eax, dword [eax]
mov dword [ebp - 0xf4], eax
cmp dword [0x476010], 0
jne 0x436ffe
push 0x476010
push 0x408d2c
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x168], 0x476010
jmp 0x437008
mov dword [ebp - 0x168], 0x476010
mov eax, dword [ebp - 0x168]
push dword [eax]
lea eax, [ebp - 0x54]
push eax
call sub.MSVBVM60.DLL___vbaObjSetAddref
push eax
mov eax, dword [ebp - 0xf4]
mov eax, dword [eax]
push dword [ebp - 0xf4]
call dword [eax + 0x10]
fnclex
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0
jge 0x43705c
push 0x10
push 0x411754
push dword [ebp - 0xf4]
push dword [ebp - 0xf8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x16c], eax
jmp 0x437063
and dword [ebp - 0x16c], 0
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x61
cmp word [0x476114], 0xffff
jne 0x43709b
mov dword [ebp - 4], 0x62
push dword [0x476120]
mov ax, word [0x47611c]
push eax
push dword [0x476118]
call fcn.00443247
mov dword [ebp - 4], 0x64
movsx eax, word [ebp - 0x38]
test eax, eax
je 0x4370b6
mov dword [ebp - 4], 0x65
call fcn.00445d6e
mov dword [ebp - 4], 0x67
mov eax, dword [ebp + 0xc]
cmp word [eax], 6
jne 0x4370db
mov dword [ebp - 4], 0x68
push 0
call fcn.00410918
call sub.MSVBVM60.DLL___vbaSetSystemError
jmp 0x4370ee
mov dword [ebp - 4], 0x6a
push 1
call fcn.00410918
call sub.MSVBVM60.DLL___vbaSetSystemError
wait
push 0x43717e
jmp 0x43715d
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
ret