Ole con excel

Desarrollo en VB6.0:
agrege la referencia (Dll) excel 9.0 para trabajar ole

Tengo el codigo:
Dim appEx as Excel.Application
Dim wb as Excel.Workbook

set appEx = GetObject(,"Excel.Application")
set wb = appEx.Workbooks.open("Factura.xls")
Todo funciona perfecto, Pero...:

Si ejecuto el codigo 2,3,4 o mas veces me da el mensaje
que "LIBRO YA ESTA ABIERTO DESEA ABRIRLO NUEVAMENTE"

Entonces quiero hacer:
1.- Que pregunte si esta abierto el libro "Factura"
"Como es la instruccion" ?

2.- Si esta abierto que lo cierre
"Como es la instruccion" ?