Function at 0x41c220
Capabilities:
Resolve function by parsing pe exports

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x401856
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x98
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x4015f8
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
lea edx, [ebp + 0xc]
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaVarDup]
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call dword [sym.imp.MSVBVM60.DLL___vbaOnError]
mov dword [ebp - 4], 3
mov dword [ebp - 0x6c], 0x20e
mov dword [ebp - 0x74], 2
lea eax, [ebp - 0x74]
push eax
lea ecx, [ebp - 0x84]
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftTrimVar]
lea edx, [ebp - 0x84]
push edx
lea eax, [ebp - 0x74]
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 4
push 0
push 0
push 1
push 0
lea ecx, [ebp - 0x88]
push ecx
push 0x10
push 0x880
call dword [sym.imp.MSVBVM60.DLL___vbaRedim]
add esp, 0x1c
mov dword [ebp - 0x90], 0x12d
mov dword [ebp - 0x98], 2
lea edx, [ebp - 0x98]
mov eax, dword [ebp - 0x88]
xor ecx, ecx
sub ecx, dword [eax + 0x14]
shl ecx, 4
mov eax, dword [ebp - 0x88]
mov eax, dword [eax + 0xc]
add ecx, eax
call dword [sym.imp.MSVBVM60.DLL___vbaVarMove]
lea ecx, [ebp - 0x88]
push ecx
lea edx, [ebp - 0x74]
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcSwitch]
lea eax, [ebp - 0x88]
push eax
push 0
call dword [sym.imp.MSVBVM60.DLL___vbaErase]
lea ecx, [ebp - 0x74]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov dword [ebp - 4], 5
mov dword [ebp - 0x6c], 0x8f
mov dword [ebp - 0x74], 2
lea ecx, [ebp - 0x74]
push ecx
lea edx, [ebp - 0x84]
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftTrimVar]
lea eax, [ebp - 0x84]
push eax
lea ecx, [ebp - 0x74]
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 6
mov dword [ebp - 0x6c], 0xc8
mov dword [ebp - 0x74], 2
lea edx, [ebp - 0x74]
push edx
lea eax, [ebp - 0x84]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcLeftTrimVar]
lea ecx, [ebp - 0x84]
push ecx
lea edx, [ebp - 0x74]
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 7
mov dword [ebp - 0x6c], 0x2c5
mov dword [ebp - 0x74], 2
push 1
push 1
lea eax, [ebp - 0x74]
push eax
push 0x106
call dword [sym.imp.MSVBVM60.DLL___vbaStrI2]
mov edx, eax
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
lea ecx, [ebp - 0x84]
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcDatePart]
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea edx, [ebp - 0x84]
push edx
lea eax, [ebp - 0x74]
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 8
mov ecx, dword [ebp + 8]
add ecx, 0x3c
push ecx
call fcn.0041eff0
mov dword [ebp - 0x5c], eax
mov dword [ebp - 4], 9
mov edx, dword [ebp - 0x5c]
mov eax, dword [ebp + 8]
lea ecx, [eax + edx + 0x78]
push ecx
call fcn.0041eff0
mov edx, dword [ebp + 8]
add edx, eax
mov dword [ebp - 0x60], edx
mov dword [ebp - 4], 0xa
mov eax, dword [ebp - 0x60]
add eax, 0x18
push eax
call fcn.0041eff0
mov dword [ebp - 0x30], eax
mov dword [ebp - 4], 0xb
mov ecx, dword [ebp - 0x60]
add ecx, 0x20
push ecx
call fcn.0041eff0
mov edx, dword [ebp + 8]
add edx, eax
mov dword [ebp - 0x58], edx
mov dword [ebp - 4], 0xc
mov eax, dword [ebp - 0x60]
add eax, 0x24
push eax
call fcn.0041eff0
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x28], ecx
mov dword [ebp - 4], 0xd
mov dword [ebp - 0x6c], 0x28c
mov dword [ebp - 0x74], 2
push 1
push 1
lea edx, [ebp - 0x74]
push edx
push 0x311
call dword [sym.imp.MSVBVM60.DLL___vbaStrI2]
mov edx, eax
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
lea eax, [ebp - 0x84]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcDatePart]
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x84]
push ecx
lea edx, [ebp - 0x74]
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 0xe
mov eax, dword [ebp - 0x60]
add eax, 0x1c
push eax
call fcn.0041eff0
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x2c], ecx
mov dword [ebp - 4], 0xf
mov dword [ebp - 0x6c], 0x19
mov dword [ebp - 0x74], 2
lea edx, [ebp - 0x74]
push edx
lea eax, [ebp - 0x84]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcLeftTrimVar]
lea ecx, [ebp - 0x84]
push ecx
lea edx, [ebp - 0x74]
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 0x10
mov eax, dword [ebp - 0x30]
sub eax, 1
mov dword [ebp - 0xa4], eax
mov dword [ebp - 0xa0], 1
mov dword [ebp - 0x24], 0
jmp 0x41c586
mov ecx, dword [ebp - 0x24]
add ecx, dword [ebp - 0xa0]
mov dword [ebp - 0x24], ecx
mov edx, dword [ebp - 0x24]
cmp edx, dword [ebp - 0xa4]
jg 0x41c6f9
mov dword [ebp - 4], 0x11
mov dword [ebp - 0x6c], 0x2f8
mov dword [ebp - 0x74], 2
lea eax, [ebp - 0x74]
push eax
push 0x406c2000
push 0
push 0xe0
call dword [sym.imp.MSVBVM60.DLL___vbaStrI2]
mov edx, eax
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push eax
lea ecx, [ebp - 0x84]
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcDateAdd]
lea ecx, [ebp - 0x64]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea edx, [ebp - 0x84]
push edx
lea eax, [ebp - 0x74]
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
mov dword [ebp - 4], 0x12
mov ecx, dword [ebp - 0x24]
mov edx, dword [ebp - 0x58]
lea eax, [edx + ecx*4]
push eax
call fcn.0041eff0
mov dword [ebp - 0x9c], eax
mov eax, 0x10
call sub.MSVBVM60.DLL___vbaChkstk
mov ecx, esp
mov edx, dword [ebp - 0x40]
mov dword [ecx], edx
mov eax, dword [ebp - 0x3c]
mov dword [ecx + 4], eax
mov edx, dword [ebp - 0x38]
mov dword [ecx + 8], edx
mov eax, dword [ebp - 0x34]
mov dword [ecx + 0xc], eax
mov ecx, dword [ebp + 8]
add ecx, dword [ebp - 0x9c]
push ecx
call fcn.0041a7e0
sub ax, 0xffff
neg ax
sbb eax, eax
inc eax
neg eax
movsx edx, ax
test edx, edx
je 0x41c6c5
mov dword [ebp - 4], 0x13
mov eax, dword [ebp - 0x24]
mov ecx, dword [ebp - 0x28]
lea edx, [ecx + eax*2]
push edx
call fcn.0041a6c0
shl ax, 2
movsx eax, ax
mov ecx, dword [ebp - 0x2c]
add ecx, eax
push ecx
call fcn.0041eff0
add eax, dword [ebp + 8]
mov dword [ebp - 0x44], eax
mov dword [ebp - 4], 0x14
mov dword [ebp - 0x6c], 0x305
mov dword [ebp - 0x74], 2
lea edx, [ebp - 0x74]
push edx
lea eax, [ebp - 0x84]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcLeftTrimVar]
lea ecx, [ebp - 0x84]
push ecx
lea edx, [ebp - 0x74]
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
jmp 0x41c6f9
mov dword [ebp - 4], 0x17
mov dword [ebp - 0x6c], 0x1ac
mov dword [ebp - 0x74], 2
lea eax, [ebp - 0x74]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcIsObject]
lea ecx, [ebp - 0x74]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov dword [ebp - 4], 0x18
jmp 0x41c57a
wait
push 0x41c743
jmp 0x41c730
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
lea ecx, [ebp - 0x54]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
ret