Function at 0x480210
Capabilities:
Access peb ldr_data
Check for peb ntglobalflag flag
Get ntdll base address
Get number of processors
Get process heap flags
Get process heap force flags

Disassembly:
push ebp
mov ebp, esp
sub esp, 8
push 0x403426
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x90
push ebx
push esi
push edi
mov dword [ebp - 8], esp
mov dword [ebp - 4], 0x402a90
push 8
lea eax, [ebp - 0x2c]
xor ebx, ebx
push 0x4116cc
push eax
mov dword [ebp - 0x34], ebx
mov dword [ebp - 0x38], ebx
mov dword [ebp - 0x3c], ebx
mov dword [ebp - 0x4c], ebx
mov dword [ebp - 0x5c], ebx
mov dword [ebp - 0x6c], ebx
mov dword [ebp - 0x7c], ebx
mov dword [ebp - 0x80], ebx
mov dword [ebp - 0x90], ebx
call dword [sym.imp.MSVBVM60.DLL___vbaAryConstruct2]
mov ecx, dword [ebp - 0x20]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
mov edx, 0x4114c4
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x4114d0
add ecx, 4
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4114dc
lea ecx, [eax + 8]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x4114e8
add ecx, 0xc
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4114f8
lea ecx, [eax + 0x10]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411508
add ecx, 0x14
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x411514
lea ecx, [eax + 0x18]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411520
add ecx, 0x1c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x41152c
lea ecx, [eax + 0x20]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411538
add ecx, 0x24
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x411544
lea ecx, [eax + 0x28]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411550
add ecx, 0x2c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4113ac
lea ecx, [eax + 0x30]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x41155c
add ecx, 0x34
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x411578
lea ecx, [eax + 0x38]
call esi
mov edx, 0x411590
mov ecx, dword [ebp - 0x20]
add ecx, 0x3c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4115a8
lea ecx, [eax + 0x40]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x4115b4
add ecx, 0x44
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4115c8
lea ecx, [eax + 0x48]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x4115e4
add ecx, 0x4c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4115f8
lea ecx, [eax + 0x50]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x41160c
add ecx, 0x54
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x411620
lea ecx, [eax + 0x58]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411634
add ecx, 0x5c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x411654
lea ecx, [eax + 0x60]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411660
add ecx, 0x64
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x41166c
lea ecx, [eax + 0x68]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x411688
add ecx, 0x6c
call esi
mov eax, dword [ebp - 0x20]
mov edx, 0x4116a8
lea ecx, [eax + 0x70]
call esi
mov ecx, dword [ebp - 0x20]
mov edx, 0x4116b8
add ecx, 0x74
call esi
mov edx, dword [ebp + 8]
lea ecx, [ebp - 0x38]
mov eax, dword [edx]
lea edx, [ebp - 0x90]
push eax
push ecx
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaForEachCollAd]
cmp eax, ebx
je 0x48062c
mov edx, 0x40ae08
lea ecx, [ebp - 0x34]
call esi
mov eax, dword [ebp - 0x38]
push ebx
push 0x40e9d4
lea ecx, [ebp - 0x4c]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaLateMemCallLd]
add esp, 0x10
lea edx, [ebp - 0x5c]
push eax
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLowerCaseVar]
lea eax, [ebp - 0x5c]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaStrVarMove]
mov edx, eax
lea ecx, [ebp - 0x34]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x5c]
lea edx, [ebp - 0x4c]
push ecx
push edx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
add esp, 0xc
call dword [sym.imp.MSVBVM60.DLL_rtcErrObj]
push eax
lea eax, [ebp - 0x3c]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaObjSet]
mov edi, eax
lea edx, [ebp - 0x80]
push edx
push edi
mov ecx, dword [edi]
call dword [ecx + 0x1c]
cmp eax, ebx
fnclex
jge 0x48049b
push 0x1c
push 0x40d674
push edi
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov edx, dword [ebp - 0x80]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
xor eax, eax
cmp edx, ebx
setne al
neg eax
lea ecx, [ebp - 0x3c]
mov dword [ebp - 0x8c], eax
call edi
cmp word [ebp - 0x8c], bx
je 0x4804dd
call dword [sym.imp.MSVBVM60.DLL_rtcErrObj]
lea ecx, [ebp - 0x3c]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaObjSet]
mov edx, dword [eax]
push eax
call dword [edx + 0x48]
lea ecx, [ebp - 0x3c]
call edi
mov eax, dword [ebp - 0x34]
push eax
push 0x40ae08
call dword [sym.imp.MSVBVM60.DLL___vbaStrCmp]
test eax, eax
je 0x480616
lea ecx, [ebp - 0x2c]
push ecx
push 1
call dword [sym.imp.MSVBVM60.DLL___vbaUbound]
lea edx, [ebp - 0x2c]
mov dword [ebp - 0x98], eax
push edx
push 1
call dword [sym.imp.MSVBVM60.DLL___vbaLbound]
mov dword [ebp - 0x14], eax
cmp eax, dword [ebp - 0x98]
jg 0x480616
mov ecx, dword [ebp - 0x34]
lea edi, [eax - 1]
cmp edi, 0x1e
mov dword [ebp - 0x74], ecx
mov dword [ebp - 0x7c], 0x8008
jb 0x48053c
call dword [sym.imp.MSVBVM60.DLL___vbaGenerateBoundsError]
mov edx, dword [ebp - 0x20]
lea ecx, [ebp - 0x6c]
push ecx
mov dword [ebp - 0x6c], 0x4008
lea eax, [edx + edi*4]
lea edx, [ebp - 0x4c]
push edx
mov dword [ebp - 0x64], eax
call dword [sym.imp.MSVBVM60.DLL_rtcLowerCaseVar]
lea eax, [ebp - 0x7c]
lea ecx, [ebp - 0x4c]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaVarTstEq]
lea ecx, [ebp - 0x4c]
mov di, ax
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
cmp di, bx
je 0x4805fe
mov edx, dword [ebp - 0x38]
push ebx
push 0x411140
push edx
call dword [sym.imp.MSVBVM60.DLL___vbaLateMemCall]
add esp, 0xc
call dword [sym.imp.MSVBVM60.DLL_rtcErrObj]
push eax
lea eax, [ebp - 0x3c]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaObjSet]
mov edi, eax
lea edx, [ebp - 0x80]
push edx
push edi
mov ecx, dword [edi]
call dword [ecx + 0x1c]
cmp eax, ebx
fnclex
jge 0x4805c2
push 0x1c
push 0x40d674
push edi
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
mov edx, dword [ebp - 0x80]
xor eax, eax
cmp edx, ebx
lea ecx, [ebp - 0x3c]
setne al
neg eax
mov edi, eax
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
cmp di, bx
je 0x4805fe
call dword [sym.imp.MSVBVM60.DLL_rtcErrObj]
lea ecx, [ebp - 0x3c]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaObjSet]
mov edx, dword [eax]
push eax
call dword [edx + 0x48]
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
mov ecx, dword [ebp - 0x14]
mov eax, 1
add eax, ecx
jo 0x480692
mov dword [ebp - 0x14], eax
jmp 0x480515
lea eax, [ebp - 0x38]
lea ecx, [ebp - 0x90]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL___vbaNextEachCollAd]
jmp 0x48040d
push 0x48067f
jmp 0x480650
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaFreeObj]
lea ecx, [ebp - 0x90]
call esi
lea edx, [ebp - 0x80]
lea ecx, [ebp - 0x2c]
push edx
push 0
mov dword [ebp - 0x80], ecx
call dword [sym.imp.MSVBVM60.DLL___vbaAryDestruct]
lea ecx, [ebp - 0x34]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x38]
call esi
ret
call dword [sym.imp.MSVBVM60.DLL___vbaErrorOverflow]
nop
nop
nop
nop
nop
nop
nop
nop