Function at 0x40e779
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x4042b6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x118
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x402128
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
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 4
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 5
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 6
mov edx, dword [0x42118c]
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 7
cmp dword [0x42166c], 0
jne 0x40e845
push 0x42166c
push 0x4052cc
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x100], 0x42166c
jmp 0x40e84f
mov dword [ebp - 0x100], 0x42166c
mov eax, dword [ebp - 0x100]
mov eax, dword [eax]
mov dword [ebp - 0xcc], eax
lea eax, [ebp - 0x50]
push eax
mov eax, dword [ebp - 0xcc]
mov eax, dword [eax]
push dword [ebp - 0xcc]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xd0], eax
cmp dword [ebp - 0xd0], 0
jge 0x40e8a3
push 0x14
push 0x4052bc
push dword [ebp - 0xcc]
push dword [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x104], eax
jmp 0x40e8aa
and dword [ebp - 0x104], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0xd4], eax
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 0xd4]
mov eax, dword [eax]
push dword [ebp - 0xd4]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xd8], eax
cmp dword [ebp - 0xd8], 0
jge 0x40e8f9
push 0x50
push 0x4052dc
push dword [ebp - 0xd4]
push dword [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x108], eax
jmp 0x40e900
and dword [ebp - 0x108], 0
push dword [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaLenBstr
sub eax, 3
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xdc], ax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
movsx eax, word [ebp - 0xdc]
test eax, eax
je 0x40f45d
mov dword [ebp - 4], 8
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 9
push dword [0x4210b0]
push 1
call sub.MSVBVM60.DLL___vbaUbound
mov word [ebp - 0xe4], ax
mov word [ebp - 0xe0], 1
and word [ebp - 0x38], 0
jmp 0x40e985
mov ax, word [ebp - 0x38]
add ax, word [ebp - 0xe0]
mov word [ebp - 0x38], ax
mov ax, word [ebp - 0x38]
cmp ax, word [ebp - 0xe4]
jg 0x40eecc
mov dword [ebp - 4], 0xa
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0xb
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0xc
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0xd
cmp dword [0x42166c], 0
jne 0x40e9fa
push 0x42166c
push 0x4052cc
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x10c], 0x42166c
jmp 0x40ea04
mov dword [ebp - 0x10c], 0x42166c
mov eax, dword [ebp - 0x10c]
mov eax, dword [eax]
mov dword [ebp - 0xcc], eax
lea eax, [ebp - 0x50]
push eax
mov eax, dword [ebp - 0xcc]
mov eax, dword [eax]
push dword [ebp - 0xcc]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xd0], eax
cmp dword [ebp - 0xd0], 0
jge 0x40ea58
push 0x14
push 0x4052bc
push dword [ebp - 0xcc]
push dword [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x110], eax
jmp 0x40ea5f
and dword [ebp - 0x110], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0xd4], eax
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 0xd4]
mov eax, dword [eax]
push dword [ebp - 0xd4]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xd8], eax
cmp dword [ebp - 0xd8], 0
jge 0x40eaae
push 0x50
push 0x4052dc
push dword [ebp - 0xd4]
push dword [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x114], eax
jmp 0x40eab5
and dword [ebp - 0x114], 0
push dword [ebp - 0x40]
push dword [0x4210fc]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x405650
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
movsx eax, word [ebp - 0x38]
push eax
push dword [0x4210b0]
call sub.MSVBVM60.DLL___vbaDerefAry1
push dword [eax]
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 8
lea eax, [ebp - 0x60]
push eax
call fcn.00408764
mov word [ebp - 0xdc], ax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x40]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x10
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xdc]
test eax, eax
je 0x40ee9a
mov dword [ebp - 4], 0xe
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0xf
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x10
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x11
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x12
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x13
or word [ebp - 0x28], 0xffff
mov dword [ebp - 4], 0x14
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x15
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x16
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x17
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x18
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x64]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x6c], 0
mov dword [ebp - 0x74], 2
lea esi, [ebp - 0x74]
push 0
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x7c], 0
mov dword [ebp - 0x84], 2
lea esi, [ebp - 0x84]
push 1
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
cmp dword [0x42166c], 0
jne 0x40ec8e
push 0x42166c
push 0x4052cc
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x118], 0x42166c
jmp 0x40ec98
mov dword [ebp - 0x118], 0x42166c
mov eax, dword [ebp - 0x118]
mov eax, dword [eax]
mov dword [ebp - 0xcc], eax
lea eax, [ebp - 0x50]
push eax
mov eax, dword [ebp - 0xcc]
mov eax, dword [eax]
push dword [ebp - 0xcc]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xd0], eax
cmp dword [ebp - 0xd0], 0
jge 0x40ecec
push 0x14
push 0x4052bc
push dword [ebp - 0xcc]
push dword [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x11c], eax
jmp 0x40ecf3
and dword [ebp - 0x11c], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0xd4], eax
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 0xd4]
mov eax, dword [eax]
push dword [ebp - 0xd4]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xd8], eax
cmp dword [ebp - 0xd8], 0
jge 0x40ed42
push 0x50
push 0x4052dc
push dword [ebp - 0xd4]
push dword [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x120], eax
jmp 0x40ed49
and dword [ebp - 0x120], 0
push dword [ebp - 0x40]
push dword [0x4210fc]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x405650
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
movsx eax, word [ebp - 0x38]
push eax
push dword [0x4210b0]
call sub.MSVBVM60.DLL___vbaDerefAry1
push dword [eax]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x8c], eax
mov dword [ebp - 0x94], 3
lea esi, [ebp - 0x94]
push 2
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x9c], 0
mov dword [ebp - 0xa4], 2
lea esi, [ebp - 0xa4]
push 3
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xac], 0
mov dword [ebp - 0xb4], 2
lea esi, [ebp - 0xb4]
push 4
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xbc], 1
mov dword [ebp - 0xc4], 2
lea esi, [ebp - 0xc4]
push 5
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x64]
push eax
push dword [0x421034]
push dword [ebp - 0x34]
call fcn.0040fb36
lea eax, [ebp - 0x64]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x48]
push eax
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x40]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x19
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x1b
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x1c
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x1d
jmp 0x40e976
mov dword [ebp - 4], 0x1e
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x1f
cmp dword [0x42166c], 0
jne 0x40ef0a
push 0x42166c
push 0x4052cc
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x124], 0x42166c
jmp 0x40ef14
mov dword [ebp - 0x124], 0x42166c
mov eax, dword [ebp - 0x124]
mov eax, dword [eax]
mov dword [ebp - 0xcc], eax
lea eax, [ebp - 0x50]
push eax
mov eax, dword [ebp - 0xcc]
mov eax, dword [eax]
push dword [ebp - 0xcc]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xd0], eax
cmp dword [ebp - 0xd0], 0
jge 0x40ef68
push 0x14
push 0x4052bc
push dword [ebp - 0xcc]
push dword [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x128], eax
jmp 0x40ef6f
and dword [ebp - 0x128], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0xd4], eax
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 0xd4]
mov eax, dword [eax]
push dword [ebp - 0xd4]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xd8], eax
cmp dword [ebp - 0xd8], 0
jge 0x40efbe
push 0x50
push 0x4052dc
push dword [ebp - 0xd4]
push dword [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x12c], eax
jmp 0x40efc5
and dword [ebp - 0x12c], 0
mov eax, dword [ebp - 0x40]
mov dword [ebp - 0xfc], eax
and dword [ebp - 0x40], 0
mov edx, dword [ebp - 0xfc]
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x20
movsx eax, word [ebp - 0x28]
test eax, eax
jne 0x40f45d
mov dword [ebp - 4], 0x21
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x22
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x23
cmp dword [0x42166c], 0
jne 0x40f04c
push 0x42166c
push 0x4052cc
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x130], 0x42166c
jmp 0x40f056
mov dword [ebp - 0x130], 0x42166c
mov eax, dword [ebp - 0x130]
mov eax, dword [eax]
mov dword [ebp - 0xcc], eax
lea eax, [ebp - 0x50]
push eax
mov eax, dword [ebp - 0xcc]
mov eax, dword [eax]
push dword [ebp - 0xcc]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xd0], eax
cmp dword [ebp - 0xd0], 0
jge 0x40f0aa
push 0x14
push 0x4052bc
push dword [ebp - 0xcc]
push dword [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x134], eax
jmp 0x40f0b1
and dword [ebp - 0x134], 0
mov eax, dword [ebp - 0x50]
mov dword [ebp - 0xd4], eax
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 0xd4]
mov eax, dword [eax]
push dword [ebp - 0xd4]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xd8], eax
cmp dword [ebp - 0xd8], 0
jge 0x40f100
push 0x50
push 0x4052dc
push dword [ebp - 0xd4]
push dword [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x138], eax
jmp 0x40f107
and dword [ebp - 0x138], 0
push dword [ebp - 0x40]
push dword [0x4210fc]
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 8
lea eax, [ebp - 0x60]
push eax
call fcn.00408764
mov word [ebp - 0xdc], ax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeObj
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xdc]
test eax, eax
je 0x40f2d8
mov dword [ebp - 4], 0x24
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x25
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x64]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x6c], 0
mov dword [ebp - 0x74], 2
lea esi, [ebp - 0x74]
push 0
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x7c], 0
mov dword [ebp - 0x84], 2
lea esi, [ebp - 0x84]
push 1
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
push dword [ebp - 0x2c]
push dword [0x4210fc]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x8c], eax
mov dword [ebp - 0x94], 3
lea esi, [ebp - 0x94]
push 2
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x9c], 0
mov dword [ebp - 0xa4], 2
lea esi, [ebp - 0xa4]
push 3
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xac], 0
mov dword [ebp - 0xb4], 2
lea esi, [ebp - 0xb4]
push 4
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xbc], 1
mov dword [ebp - 0xc4], 2
lea esi, [ebp - 0xc4]
push 5
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x64]
push eax
push dword [0x421034]
push dword [ebp - 0x34]
call fcn.0040fb36
lea eax, [ebp - 0x64]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x26
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
jmp 0x40f45d
mov dword [ebp - 4], 0x28
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x29
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x2a
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x2b
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x64]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x6c], 0
mov dword [ebp - 0x74], 2
lea esi, [ebp - 0x74]
push 0
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x7c], 0
mov dword [ebp - 0x84], 2
lea esi, [ebp - 0x84]
push 1
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
push dword [ebp - 0x2c]
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x8c], eax
mov dword [ebp - 0x94], 3
lea esi, [ebp - 0x94]
push 2
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x9c], 0
mov dword [ebp - 0xa4], 2
lea esi, [ebp - 0xa4]
push 3
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xac], 0
mov dword [ebp - 0xb4], 2
lea esi, [ebp - 0xb4]
push 4
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xbc], 1
mov dword [ebp - 0xc4], 2
lea esi, [ebp - 0xc4]
push 5
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x64]
push eax
push dword [0x421034]
push dword [ebp - 0x34]
call fcn.0040fb36
lea eax, [ebp - 0x64]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x2c
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x30
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x31
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x32
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x33
push 0
push 0
push 1
push 0
lea eax, [ebp - 0x64]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0x6c], 0x7d0
mov dword [ebp - 0x74], 2
lea esi, [ebp - 0x74]
push 0
push dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x64]
push eax
push dword [0x4210a8]
push dword [0x421190]
call fcn.0040fb36
lea eax, [ebp - 0x64]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x34
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x35
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x36
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x37
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x38
mov word [ebp - 0xc8], 8
lea eax, [ebp - 0xc8]
push eax
call fcn.00409640
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x39
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x3a
push dword [ebp - 0x30]
call fcn.0040a2a7
mov dword [ebp - 4], 0x3b
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x3c
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x3d
lea eax, [ebp - 0x30]
push eax
call fcn.0040c776
mov dword [ebp - 0x24], eax
mov dword [ebp - 4], 0x3e
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x3f
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x40
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x41
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x42
lea eax, [ebp - 0x24]
push eax
call fcn.0041b358
mov dword [ebp - 4], 0x43
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x44
call fcn.0040c4e3
mov dword [ebp - 4], 0x45
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x46
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x47
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x48
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x49
mov word [ebp - 0x3c], 0x1f40
mov dword [ebp - 4], 0x4a
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x40]
push eax
movsx eax, word [ebp - 0x3c]
push eax
push dword [0x4212b8]
call fcn.004066e4
mov dword [0x421214], eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x4b
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x4c
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x4d
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x4e
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x4f
cmp dword [0x421214], 0xffffffff
je 0x40f740
cmp dword [0x421214], 0
jne 0x40f77e
mov dword [ebp - 4], 0x50
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x40]
push eax
movsx eax, word [ebp - 0x3c]
push eax
push dword [0x421080]
call fcn.004066e4
mov dword [0x421214], eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x52
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x53
cmp dword [0x421214], 0xffffffff
je 0x40f7aa
cmp dword [0x421214], 0
jne 0x40f7e8
mov dword [ebp - 4], 0x54
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x40]
push eax
movsx eax, word [ebp - 0x3c]
push eax
push dword [0x42128c]
call fcn.004066e4
mov dword [0x421214], eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x56
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x57
cmp dword [0x421214], 0xffffffff
je 0x40f814
cmp dword [0x421214], 0
jne 0x40f852
mov dword [ebp - 4], 0x58
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x40]
push eax
movsx eax, word [ebp - 0x3c]
push eax
push dword [0x4212d4]
call fcn.004066e4
mov dword [0x421214], eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x5a
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x5b
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x5c
cmp dword [0x421214], 0xffffffff
je 0x40f891
cmp dword [0x421214], 0
jne 0x40f8cf
mov dword [ebp - 4], 0x5d
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x40]
push eax
movsx eax, word [ebp - 0x3c]
push eax
push dword [0x4212d8]
call fcn.004066e4
mov dword [0x421214], eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x5f
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x60
push 0
call fcn.004051f8
call sub.MSVBVM60.DLL___vbaSetSystemError
push 0x40f94b
jmp 0x40f932
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