0040E880 	push	ebp
0040E881 	mov	ebp,esp
0040E883 	sub	esp,0Ch
0040E886 	push	00401476h
0040E88B 	mov	eax,fs:[00000000h]
0040E891 	push	eax
0040E892 	mov	fs:[00000000h],esp
0040E899 	sub	esp,0Ch
0040E89C 	push	ebx
0040E89D 	push	esi
0040E89E 	mov	esi,[ebp+00000008h]
0040E8A1 	push	edi
0040E8A2 	mov	eax,esi
0040E8A4 	and	esi,FFFFFFFEh
0040E8A7 	mov	[ebp-0000000Ch],esp
0040E8AA 	and	eax,01h
0040E8AD 	mov	ecx,[esi]

* Possible string reference 401040h ""
|
0040E8AF 	mov	dword ptr [ebp-00000008h],00401040h
0040E8B6 	push	esi
0040E8B7 	mov	[ebp-00000004h],eax
0040E8BA 	mov	[ebp+00000008h],esi
0040E8BD 	call	dword ptr [ecx+00000004h]
0040E8C0 	mov	edx,[esi]
0040E8C2 	push	esi
0040E8C3 	call	dword ptr [edx+00000718h]
0040E8C9 	test	eax,eax
0040E8CB 	jnl	0040E8DFh
0040E8CD 	push	00000718h

* Possible string reference 4089E8h ""
|
0040E8D2 	push	004089E8h
0040E8D7 	push	esi
0040E8D8 	push	eax

* Reference to MSVBVM50.__vbaHresultCheckObj
|
0040E8D9 	call	dword ptr [0041F220h]
0040E8DF 	mov	dword ptr [ebp-00000004h],00000000h
0040E8E6 	mov	eax,[ebp+00000008h]
0040E8E9 	push	eax
0040E8EA 	mov	ecx,[eax]
0040E8EC 	call	dword ptr [ecx+00000008h]
0040E8EF 	mov	ecx,[ebp-00000014h]
0040E8F2 	mov	eax,[ebp-00000004h]
0040E8F5 	pop	edi
0040E8F6 	pop	esi
0040E8F7 	mov	fs:[00000000h],ecx
0040E8FE 	pop	ebx
0040E8FF 	mov	esp,ebp
0040E901 	pop	ebp
0040E902 	ret	0004h
0040E905 	nop
0040E906 	nop
0040E907 	nop
0040E908 	nop
0040E909 	nop
0040E90A 	nop
0040E90B 	nop
0040E90C 	nop
0040E90D 	nop
0040E90E 	nop
0040E90F 	nop