Function at 0x4163d8
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x4033c6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x378
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x4013a0
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov dword [ebp - 4], 2
push 1
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 3
push 0
push 0x40951c
lea eax, [ebp - 0x108]
push eax
call sub.MSVBVM60.DLL_rtcCreateObject2
lea eax, [ebp - 0x108]
push eax
lea eax, [ebp - 0x70]
push eax
call sub.MSVBVM60.DLL___vbaVarSetVar
mov dword [ebp - 4], 4
push 0x4049c8
call sub.MSVBVM60.DLL___vbaNew
push eax
lea eax, [ebp - 0x24]
push eax
call sub.MSVBVM60.DLL___vbaObjSet
mov dword [ebp - 4], 5
push 0x407744
mov eax, dword [ebp + 0x14]
push dword [eax]
call fcn.0042a498
mov word [ebp - 0x34], ax
mov dword [ebp - 4], 6
and word [ebp - 0x2cc], 0
mov edx, 0x4095d0
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 7
mov word [ebp - 0x2cc], 5
lea eax, [ebp - 0x2cc]
push eax
call fcn.0042055c
mov dword [ebp - 4], 8
and word [ebp - 0x2cc], 0
mov dword [ebp - 0x230], 0x408220
mov dword [ebp - 0x238], 8
lea eax, [ebp - 0x108]
push eax
call fcn.0042009f
mov dword [ebp - 0x240], 0x40824c
mov dword [ebp - 0x248], 8
call fcn.004204b3
mov dword [ebp - 0x130], eax
mov dword [ebp - 0x138], 8
lea eax, [ebp - 0x238]
push eax
lea eax, [ebp - 0x108]
push eax
lea eax, [ebp - 0x118]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x248]
push eax
lea eax, [ebp - 0x128]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x138]
push eax
lea eax, [ebp - 0x148]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
lea eax, [ebp - 0x148]
push eax
lea eax, [ebp - 0x138]
push eax
lea eax, [ebp - 0x128]
push eax
lea eax, [ebp - 0x118]
push eax
lea eax, [ebp - 0x108]
push eax
push 5
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x18
mov dword [ebp - 4], 9
or word [ebp - 0x94], 0xffff
mov dword [ebp - 4], 0xa
mov edx, 0x408100
lea ecx, [ebp - 0xac]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0xb
mov edx, 0x408100
lea ecx, [ebp - 0xc0]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0xc
push dword [ebp - 0xac]
call sub.MSVBVM60.DLL___vbaLenBstr
test eax, eax
jne 0x416b28
mov dword [ebp - 4], 0xd
call fcn.00428328
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x4096b0
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xd4]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call fcn.0041c116
mov edx, eax
lea ecx, [ebp - 0xd8]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xd8]
push eax
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xd0]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x10
mov dword [ebp - 4], 0xe
push dword [ebp - 0x2c]
push 0x4096b0
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call fcn.0041c07d
mov edx, eax
lea ecx, [ebp - 0xd4]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xc0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xd0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0xf
lea eax, [ebp - 0xc0]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x4096b4
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x108]
push eax
call sub.MSVBVM60.DLL___vbaVarLateMemCallLd
add esp, 0x20
push eax
call sub.MSVBVM60.DLL___vbaBoolVarNull
mov word [ebp - 0x2ec], ax
lea ecx, [ebp - 0x108]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0x2ec]
test eax, eax
je 0x416ade
mov dword [ebp - 4], 0x10
and word [ebp - 0x2cc], 0
push 0x4096d0
push dword [ebp - 0xc0]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x11
and word [ebp - 0x2cc], 0
mov edx, 0x409720
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x12
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 0x13
lea eax, [ebp - 0xc0]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x409794
lea eax, [ebp - 0x70]
push eax
call sub.MSVBVM60.DLL___vbaObjVar
push eax
call sub.MSVBVM60.DLL___vbaLateMemCall
add esp, 0x1c
mov dword [ebp - 4], 0x14
push 0
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 0x15
lea eax, [ebp - 0xc0]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
and dword [ebp - 0x240], 0
mov dword [ebp - 0x248], 0x800b
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x4096b4
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x108]
push eax
call sub.MSVBVM60.DLL___vbaVarLateMemCallLd
add esp, 0x20
push eax
lea eax, [ebp - 0x248]
push eax
call sub.MSVBVM60.DLL___vbaVarTstEq
mov word [ebp - 0x2ec], ax
lea ecx, [ebp - 0x108]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0x2ec]
test eax, eax
je 0x41692b
mov dword [ebp - 4], 0x16
and word [ebp - 0x2cc], 0
mov edx, 0x4097b0
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x416adc
mov dword [ebp - 4], 0x18
and word [ebp - 0x2cc], 0
mov edx, 0x409848
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x19
call fcn.0041bd8b
mov dword [ebp - 4], 0x1a
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 0x1b
lea eax, [ebp - 0xc0]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x409794
lea eax, [ebp - 0x70]
push eax
call sub.MSVBVM60.DLL___vbaObjVar
push eax
call sub.MSVBVM60.DLL___vbaLateMemCall
add esp, 0x1c
mov dword [ebp - 4], 0x1c
push 0
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 0x1d
lea eax, [ebp - 0xc0]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
and dword [ebp - 0x240], 0
mov dword [ebp - 0x248], 0x800b
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x4096b4
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x108]
push eax
call sub.MSVBVM60.DLL___vbaVarLateMemCallLd
add esp, 0x20
push eax
lea eax, [ebp - 0x248]
push eax
call sub.MSVBVM60.DLL___vbaVarTstEq
mov word [ebp - 0x2ec], ax
lea ecx, [ebp - 0x108]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0x2ec]
test eax, eax
je 0x416a9f
mov dword [ebp - 4], 0x1e
and word [ebp - 0x2cc], 0
mov edx, 0x4098dc
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x416adc
mov dword [ebp - 4], 0x20
and word [ebp - 0x2cc], 0
mov edx, 0x409954
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x416b28
mov dword [ebp - 4], 0x24
and word [ebp - 0x2cc], 0
push 0x4099ac
push dword [ebp - 0xc0]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x27
push dword [ebp - 0xac]
call sub.MSVBVM60.DLL___vbaLenBstr
test eax, eax
jle 0x416bc5
mov dword [ebp - 4], 0x28
and word [ebp - 0x2cc], 0
mov edx, 0x4097f4
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrCopy
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x29
lea eax, [ebp - 0xac]
push eax
call fcn.0041bf08
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xd0]
push eax
call fcn.0041bf08
mov edx, eax
lea ecx, [ebp - 0xa8]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
jmp 0x416c2b
mov dword [ebp - 4], 0x2b
and word [ebp - 0x2cc], 0
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xc0]
push eax
call fcn.00421459
mov dword [ebp - 4], 0x2c
add byte [eax], al
lea eax, [ebp - 0xc0]
push eax
call fcn.0041bf08
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xd0]
push eax
call fcn.0041bf08
mov edx, eax
lea ecx, [ebp - 0xa8]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x2e
and word [ebp - 0x2cc], 0
push 0x409a04
push dword [ebp - 0xa8]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x2cc]
push eax
lea eax, [ebp - 0xd0]
push eax
call fcn.00421459
lea ecx, [ebp - 0xd0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x2f
lea eax, [ebp - 0xa8]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
and dword [ebp - 0x240], 0
mov dword [ebp - 0x248], 0x800b
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x4092c8
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x108]
push eax
call sub.MSVBVM60.DLL___vbaVarLateMemCallLd
add esp, 0x20
push eax
lea eax, [ebp - 0x248]
push eax
call sub.MSVBVM60.DLL___vbaVarTstEq
mov word [ebp - 0x2ec], ax
lea ecx, [ebp - 0x108]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0x2ec]
test eax, eax
je 0x416d45
mov dword [ebp - 4], 0x30
lea eax, [ebp - 0xa8]
mov dword [ebp - 0x230], eax
mov dword [ebp - 0x238], 0x4008
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x238]
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 1
push 0x409a20
lea eax, [ebp - 0x70]
push eax
call sub.MSVBVM60.DLL___vbaObjVar
push eax
call sub.MSVBVM60.DLL___vbaLateMemCall
add esp, 0x1c
mov dword [ebp - 4], 0x32
push dword [ebp - 0xa8]
push 0x4096b0
invalid
sub al, 0xc8