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

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x4015f6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x88
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401418
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
lea edx, [ebp + 0xc]
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaVarDup
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 3
mov dword [ebp - 0x68], 0x80020004
mov dword [ebp - 0x70], 0xa
lea eax, [ebp - 0x70]
push eax
fldz
push ecx
push ecx
fstp qword [esp]
fldz
push ecx
push ecx
fstp qword [esp]
fldz
push ecx
push ecx
fstp qword [esp]
fldz
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcDDB
fstp qword [ebp - 0x8c]
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 4
mov eax, dword [ebp + 8]
add eax, 0x3c
push eax
call fcn.0041af63
mov dword [ebp - 0x5c], eax
mov dword [ebp - 4], 5
mov eax, dword [ebp - 0x5c]
mov ecx, dword [ebp + 8]
lea eax, [ecx + eax + 0x78]
push eax
call fcn.0041af63
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x60], ecx
mov dword [ebp - 4], 6
mov eax, dword [ebp - 0x60]
add eax, 0x18
push eax
call fcn.0041af63
mov dword [ebp - 0x30], eax
mov dword [ebp - 4], 7
mov eax, dword [ebp - 0x60]
add eax, 0x20
push eax
call fcn.0041af63
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x58], ecx
mov dword [ebp - 4], 8
and dword [ebp - 0x68], 0
mov dword [ebp - 0x70], 2
lea eax, [ebp - 0x70]
push eax
call sub.MSVBVM60.DLL_rtcIsObject
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 9
mov eax, dword [ebp - 0x60]
add eax, 0x24
push eax
call fcn.0041af63
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x28], ecx
mov dword [ebp - 4], 0xa
mov eax, dword [ebp - 0x60]
add eax, 0x1c
push eax
call fcn.0041af63
mov ecx, dword [ebp + 8]
add ecx, eax
mov dword [ebp - 0x2c], ecx
mov dword [ebp - 4], 0xb
mov eax, dword [ebp - 0x30]
dec eax
mov dword [ebp - 0x94], eax
mov dword [ebp - 0x90], 1
and dword [ebp - 0x24], 0
jmp 0x41a8d4
mov eax, dword [ebp - 0x24]
add eax, dword [ebp - 0x90]
mov dword [ebp - 0x24], eax
mov eax, dword [ebp - 0x24]
cmp eax, dword [ebp - 0x94]
jg 0x41a9a6
mov dword [ebp - 4], 0xc
push dword [ebp - 0x58]
call sub.MSVBVM60.DLL___vbaCyI4
mov esi, eax
mov edi, edx
push 0
push 0x9c40
push dword [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaCyI4
push edx
push eax
call sub.MSVBVM60.DLL___vbaCyMul
add esi, eax
adc edi, edx
push edi
push esi
call sub.MSVBVM60.DLL___vbaI4Cy
push eax
call fcn.0041af63
mov dword [ebp - 0x84], eax
push 0x10
pop eax
call sub.MSVBVM60.DLL___vbaChkstk
lea esi, [ebp - 0x40]
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]
mov eax, dword [ebp + 8]
add eax, dword [ebp - 0x84]
push eax
call fcn.0041ac15
neg eax
sbb eax, eax
neg eax
neg eax
movsx eax, ax
test eax, eax
je 0x41a99a
mov dword [ebp - 4], 0xd
push dword [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaCyI4
mov esi, eax
mov edi, edx
push 0
push 0x9c40
mov eax, dword [ebp - 0x24]
mov ecx, dword [ebp - 0x28]
lea eax, [ecx + eax*2]
push eax
call fcn.0041aad3
push eax
call sub.MSVBVM60.DLL___vbaCyMulI2
add esi, eax
adc edi, edx
push edi
push esi
call sub.MSVBVM60.DLL___vbaI4Cy
push eax
call fcn.0041af63
add eax, dword [ebp + 8]
mov dword [ebp - 0x44], eax
jmp 0x41a9a6
mov dword [ebp - 4], 0x10
jmp 0x41a8c8
wait
push 0x41a9c8
jmp 0x41a9b7
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeVar
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeVar
ret