Function at 0x41ce2d
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403a06
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x148
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401f08
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 [0x43f03c]
test eax, eax
jne 0x41d1c0
mov dword [ebp - 4], 4
mov eax, dword [ebp + 0xc]
mov ax, word [eax]
mov word [ebp - 0x100], ax
movsx eax, word [ebp - 0x100]
mov dword [ebp - 0x12c], eax
cmp dword [ebp - 0x12c], 3
je 0x41ced7
cmp dword [ebp - 0x12c], 4
je 0x41cf6f
jmp 0x41d1c0
mov dword [ebp - 4], 6
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x19b
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x43f088]
mov ecx, 0x124
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x38]
call fcn.0042f4ce
movsx eax, ax
sub eax, 7
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf0], ax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
movsx eax, word [ebp - 0xf0]
test eax, eax
je 0x41cf6a
jmp 0x41e2df
jmp 0x41d1c0
mov dword [ebp - 4], 0xa
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x19e
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
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 0x19f
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x38]
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
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 - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x1a0
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x2c]
push dword [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0xc
mov dword [ebp - 0x68], 0x100
mov dword [ebp - 0x70], 3
and dword [ebp - 0x58], 0
mov dword [ebp - 0x60], 3
mov dword [ebp - 0xa0], 0x43f03c
mov dword [ebp - 0xa8], 0x400b
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x60]
push eax
lea eax, [ebp - 0xa8]
push eax
lea eax, [ebp - 0x80]
push eax
call sub.MSVBVM60.DLL_rtcImmediateIf
mov dword [ebp - 0xd0], 0x24
mov dword [ebp - 0xd8], 3
push dword [0x43f078]
lea eax, [ebp - 0xd8]
push eax
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL___vbaVarOr
push eax
call sub.MSVBVM60.DLL___vbaI2Var
push eax
push dword [ebp - 0x2c]
call fcn.0042f4ce
movsx eax, ax
sub eax, 7
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf0], ax
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x60]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf0]
test eax, eax
je 0x41d1c0
jmp 0x41e2df
mov dword [ebp - 4], 0x11
call fcn.0043303d
movsx eax, ax
test eax, eax
je 0x41d1e1
mov dword [ebp - 4], 0x12
call fcn.004327d7
jmp 0x41d1c0
mov dword [ebp - 4], 0x14
call sub.MSVBVM60.DLL___vbaFileCloseAll
mov dword [ebp - 4], 0x15
mov dword [ebp - 0xa0], 0x43f0f8
mov dword [ebp - 0xa8], 0x4008
lea eax, [ebp - 0xa8]
push eax
call sub.MSVBVM60.DLL_rtcKillFiles
mov dword [ebp - 4], 0x16
cmp word [0x43f0ec], 0
jle 0x41d26a
mov dword [ebp - 4], 0x17
mov ax, word [0x43f0ec]
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x18
push dword [0x43f0f4]
push 0x408cec
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 8
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL_rtcKillFiles
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1a
mov eax, dword [ebp + 8]
mov eax, dword [eax]
mov dword [ebp - 0xf0], eax
lea eax, [ebp - 0xe0]
push eax
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x58]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41d2c5
push 0x58
push 0x40a9a4
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x130], eax
jmp 0x41d2cc
and dword [ebp - 0x130], 0
cmp dword [0x43f010], 0
jne 0x41d2f0
push 0x43f010
push 0x404fe0
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x134], 0x43f010
jmp 0x41d2fa
mov dword [ebp - 0x134], 0x43f010
mov eax, dword [ebp - 0x134]
mov eax, dword [eax]
mov dword [ebp - 0xf8], eax
lea eax, [ebp - 0xe4]
push eax
mov eax, dword [ebp - 0xf8]
mov eax, dword [eax]
push dword [ebp - 0xf8]
call dword [eax + 0x58]
fnclex
mov dword [ebp - 0xfc], eax
cmp dword [ebp - 0xfc], 0
jge 0x41d351
push 0x58
push 0x409444
push dword [ebp - 0xf8]
push dword [ebp - 0xfc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x138], eax
jmp 0x41d358
and dword [ebp - 0x138], 0
mov eax, dword [ebp - 0xe0]
cmp eax, dword [ebp - 0xe4]
je 0x41d40d
mov dword [ebp - 4], 0x1b
cmp dword [0x43fcf8], 0
jne 0x41d395
push 0x43fcf8
push 0x40ae04
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x13c], 0x43fcf8
jmp 0x41d39f
mov dword [ebp - 0x13c], 0x43fcf8
mov eax, dword [ebp - 0x13c]
mov eax, dword [eax]
mov dword [ebp - 0xf0], eax
mov eax, dword [ebp + 8]
push dword [eax]
lea eax, [ebp - 0x50]
push eax
call sub.MSVBVM60.DLL___vbaObjSetAddref
push eax
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x10]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41d3fe
push 0x10
push 0x40adf4
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x140], eax
jmp 0x41d405
and dword [ebp - 0x140], 0
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x1d
cmp dword [0x43f010], 0
jne 0x41d438
push 0x43f010
push 0x404fe0
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x144], 0x43f010
jmp 0x41d442
mov dword [ebp - 0x144], 0x43f010
mov eax, dword [ebp - 0x144]
mov eax, dword [eax]
mov dword [ebp - 0xf0], eax
lea eax, [ebp - 0xdc]
push eax
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x1b8]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41d49f
push 0x1b8
push 0x409444
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x148], eax
jmp 0x41d4a6
and dword [ebp - 0x148], 0
movsx eax, word [ebp - 0xdc]
test eax, eax
je 0x41d547
mov dword [ebp - 4], 0x1e
cmp dword [0x43f010], 0
jne 0x41d4e0
push 0x43f010
push 0x404fe0
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x14c], 0x43f010
jmp 0x41d4ea
mov dword [ebp - 0x14c], 0x43f010
mov eax, dword [ebp - 0x14c]
mov eax, dword [eax]
mov dword [ebp - 0xf0], eax
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x2a8]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41d540
push 0x2a8
push 0x409444
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x150], eax
jmp 0x41d547
and dword [ebp - 0x150], 0
mov dword [ebp - 4], 0x20
mov eax, dword [ebp + 0xc]
mov ax, word [eax]
mov word [ebp - 0x104], ax
movsx eax, word [ebp - 0x104]
mov dword [ebp - 0x154], eax
cmp dword [ebp - 0x154], 3
jl 0x41d9e3
cmp dword [ebp - 0x154], 4
jle 0x41d5a2
cmp dword [ebp - 0x154], 5
je 0x41d782
cmp dword [ebp - 0x154], 6
je 0x41d865
jmp 0x41d9e3
mov dword [ebp - 4], 0x22
and word [0x43f034], 0
mov dword [ebp - 4], 0x23
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa0], 0x40aa04
mov dword [ebp - 0xa8], 8
lea esi, [ebp - 0xa8]
push 0
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb0], 0x43f080
mov dword [ebp - 0xb8], 0x4008
lea esi, [ebp - 0xb8]
push 1
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x94]
push eax
push 0x19c
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
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 - 0xc0], 0x40aa04
mov dword [ebp - 0xc8], 8
lea esi, [ebp - 0xc8]
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 - 0xd0], 0x43f080
mov dword [ebp - 0xd8], 0x4008
lea esi, [ebp - 0xd8]
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 0x19d
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x38]
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x24
push dword [0x43f088]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x2c]
call fcn.0042f4ce
jmp 0x41dbaf
mov dword [ebp - 4], 0x26
and word [0x43f034], 0
mov dword [ebp - 4], 0x27
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa0], 0x40aa04
mov dword [ebp - 0xa8], 8
lea esi, [ebp - 0xa8]
push 0
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb0], 0x43f080
mov dword [ebp - 0xb8], 0x4008
lea esi, [ebp - 0xb8]
push 1
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x94]
push eax
push 0x1a2
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push 1
push dword [0x43f088]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x38]
call fcn.0042ec21
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x41dbaf
mov dword [ebp - 4], 0x29
or word [0x43f034], 0xffff
mov dword [ebp - 4], 0x2a
or word [0x43f03e], 0xffff
mov dword [ebp - 4], 0x2b
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa0], 0x40aa04
mov dword [ebp - 0xa8], 8
lea esi, [ebp - 0xa8]
push 0
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb0], 0x43f080
mov dword [ebp - 0xb8], 0x4008
lea esi, [ebp - 0xb8]
push 1
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x94]
push eax
push 0x1a1
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x43f088]
xor ecx, ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x38]
call fcn.0042f231
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x2c
call fcn.0042e33f
movsx eax, ax
test eax, eax
je 0x41d9de
mov dword [ebp - 4], 0x2d
or word [0x43f03e], 0xffff
mov dword [ebp - 4], 0x2e
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x201
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x43f088]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x38]
call fcn.0042f4ce
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x41dbaf
mov dword [ebp - 4], 0x31
push 0
push 1
push 1
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0xa0], 0x40aa04
mov dword [ebp - 0xa8], 8
lea esi, [ebp - 0xa8]
push 0
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarCopy
mov dword [ebp - 0xb0], 0x43f080
mov dword [ebp - 0xb8], 0x4008
lea esi, [ebp - 0xb8]
push 1
push dword [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarZero
lea eax, [ebp - 0x94]
push eax
push 0x19c
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
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 - 0xc0], 0x40aa04
mov dword [ebp - 0xc8], 8
lea esi, [ebp - 0xc8]
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 - 0xd0], 0x43f080
mov dword [ebp - 0xd8], 0x4008
lea esi, [ebp - 0xd8]
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 0x19d
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x98]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [ebp - 0x38]
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x32
push dword [0x43f088]
push 0x10
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x2c]
call fcn.0042f4ce
mov dword [ebp - 4], 0x34
call fcn.0043289f
mov dword [ebp - 4], 0x35
mov eax, dword [ebp + 0xc]
cmp word [eax], 6
jne 0x41de11
mov dword [ebp - 4], 0x36
mov edx, 0x40b788
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrCopy
mov edx, 0x40b708
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x28]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
push 0x80000002
call fcn.0043d448
mov word [ebp - 0xf0], ax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
movsx eax, word [ebp - 0xf0]
test eax, eax
je 0x41de0c
mov dword [ebp - 4], 0x37
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x203
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 0x78], 0x80020004
mov dword [ebp - 0x80], 0xa
mov dword [ebp - 0x68], 0x80020004
mov dword [ebp - 0x70], 0xa
mov dword [ebp - 0xa0], 0x43f088
mov dword [ebp - 0xa8], 0x4008
mov eax, dword [ebp - 0x38]
mov dword [ebp - 0x120], eax
and dword [ebp - 0x38], 0
mov eax, dword [ebp - 0x120]
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 8
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0xa8]
push eax
push 0x44
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL_rtcMsgBox
sub eax, 6
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xf0], ax
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x60]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
movsx eax, word [ebp - 0xf0]
test eax, eax
je 0x41dd26
mov dword [ebp - 4], 0x38
or word [ebp - 0x34], 0xffff
jmp 0x41de0c
mov dword [ebp - 4], 0x3a
and word [ebp - 0x34], 0
mov dword [ebp - 4], 0x3b
mov eax, dword [ebp + 0xc]
mov word [eax], 5
mov dword [ebp - 4], 0x3c
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x204
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 0x78], 0x80020004
mov dword [ebp - 0x80], 0xa
mov dword [ebp - 0x68], 0x80020004
mov dword [ebp - 0x70], 0xa
mov dword [ebp - 0xa0], 0x43f088
mov dword [ebp - 0xa8], 0x4008
mov eax, dword [ebp - 0x38]
mov dword [ebp - 0x124], eax
and dword [ebp - 0x38], 0
mov eax, dword [ebp - 0x124]
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 8
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0xa8]
push eax
push 0x30
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL_rtcMsgBox
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x60]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x10
jmp 0x41e188
mov dword [ebp - 4], 0x40
push dword [0x43f0d0]
push 0x408ea4
call sub.MSVBVM60.DLL___vbaStrTextCmp
test eax, eax
je 0x41e188
mov dword [ebp - 4], 0x41
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
je 0x41de7f
cmp dword [ebp - 0x158], 4
je 0x41de8e
cmp dword [ebp - 0x158], 5
je 0x41de70
jmp 0x41de9d
mov dword [ebp - 4], 0x43
mov word [ebp - 0x24], 1
jmp 0x41deaa
mov dword [ebp - 4], 0x45
mov word [ebp - 0x24], 3
jmp 0x41deaa
mov dword [ebp - 4], 0x47
mov word [ebp - 0x24], 2
jmp 0x41deaa
mov dword [ebp - 4], 0x49
mov word [ebp - 0x24], 1
mov dword [ebp - 4], 0x4b
or word [0x43f03e], 0xffff
mov dword [ebp - 4], 0x4c
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x7de
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
push dword [0x43f088]
push 0x40
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push dword [ebp - 0x38]
call fcn.0042f231
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x4d
call sub.MSVBVM60.DLL_rtcErrObj
push eax
lea eax, [ebp - 0x50]
push eax
call sub.MSVBVM60.DLL___vbaObjSet
mov dword [ebp - 0xf0], eax
push 0
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x20]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41df86
push 0x20
push 0x40b488
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x15c], eax
jmp 0x41df8d
and dword [ebp - 0x15c], 0
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x4e
movsx eax, word [0x43f024]
test eax, eax
je 0x41dfbe
mov dword [ebp - 4], 0x4f
mov edx, dword [0x43f028]
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrCopy
jmp 0x41dfcf
mov dword [ebp - 4], 0x51
xor edx, edx
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0x53
or word [ebp - 0xdc], 0xffff
mov eax, dword [0x43f0cc]
mov dword [ebp - 0xa0], eax
mov dword [ebp - 0xa8], 8
lea eax, [ebp - 0xdc]
push eax
push dword [ebp - 0x24]
mov ax, word [0x43f02c]
push eax
push dword [ebp - 0x30]
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0xa8]
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 [0x43f0d0]
lea eax, [ebp - 0x60]
push eax
call fcn.0041f06d
push 1
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL_rtcShell
fstp qword [ebp - 0xec]
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x54
call sub.MSVBVM60.DLL_rtcErrObj
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 9
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL___vbaBoolVarNull
mov word [ebp - 0xf0], ax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xf0]
test eax, eax
je 0x41e188
mov dword [ebp - 4], 0x55
mov dword [ebp - 0x58], 0x80020004
mov dword [ebp - 0x60], 0xa
lea eax, [ebp - 0x60]
push eax
call sub.MSVBVM60.DLL_rtcBstrFromError
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push 0xffffffffffffffff
push 0
push 0
lea eax, [ebp - 0x94]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
lea eax, [ebp - 0x94]
push eax
push 0x7dd
call fcn.0042cf2d
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x94]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov eax, dword [ebp - 0x4c]
mov dword [ebp - 0x128], eax
and dword [ebp - 0x4c], 0
push 1
push dword [0x43f088]
push 0x30
pop ecx
call sub.MSVBVM60.DLL___vbaI2I4
push eax
mov edx, dword [ebp - 0x128]
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x409a78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call fcn.0042ec21
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
push 6
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x1c
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x59
cmp dword [0x43fcf8], 0
jne 0x41e1b3
push 0x43fcf8
push 0x40ae04
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x160], 0x43fcf8
jmp 0x41e1bd
mov dword [ebp - 0x160], 0x43fcf8
mov eax, dword [ebp - 0x160]
mov eax, dword [eax]
mov dword [ebp - 0xf0], eax
cmp dword [0x43f010], 0
jne 0x41e1ef
push 0x43f010
push 0x404fe0
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x164], 0x43f010
jmp 0x41e1f9
mov dword [ebp - 0x164], 0x43f010
mov eax, dword [ebp - 0x164]
push dword [eax]
lea eax, [ebp - 0x50]
push eax
call sub.MSVBVM60.DLL___vbaObjSetAddref
push eax
mov eax, dword [ebp - 0xf0]
mov eax, dword [eax]
push dword [ebp - 0xf0]
call dword [eax + 0x10]
fnclex
mov dword [ebp - 0xf4], eax
cmp dword [ebp - 0xf4], 0
jge 0x41e24d
push 0x10
push 0x40adf4
push dword [ebp - 0xf0]
push dword [ebp - 0xf4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x168], eax
jmp 0x41e254
and dword [ebp - 0x168], 0
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x5a
cmp word [0x43f02c], 0xffff
jne 0x41e28c
mov dword [ebp - 4], 0x5b
push dword [0x43f038]
mov ax, word [0x43f034]
push eax
push dword [0x43f030]
call fcn.0042978c
mov dword [ebp - 4], 0x5d
movsx eax, word [ebp - 0x34]
test eax, eax
je 0x41e2a7
mov dword [ebp - 4], 0x5e
call fcn.0042c2b3
mov dword [ebp - 4], 0x60
mov eax, dword [ebp + 0xc]
cmp word [eax], 6
jne 0x41e2cc
mov dword [ebp - 4], 0x61
push 0
call fcn.0040a7ec
call sub.MSVBVM60.DLL___vbaSetSystemError
jmp 0x41e2df
mov dword [ebp - 4], 0x63
push 1
call fcn.0040a7ec
call sub.MSVBVM60.DLL___vbaSetSystemError
wait
push 0x41e364
jmp 0x41e34b
lea ecx, [ebp - 0x28]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaFreeStr
ret