Try...Catch ¿?
Publicado por Maria Jose (25 intervenciones) el 23/06/2006 09:56:48
Hola chic@s:
En un código estoy utilizando este bloque para detectar si existe una hoja con un nombre determinado en un documento EXCEL. Lo hago así:
Try
ApExcel.ActiveSheet.Name("General" & Pagina)
'Intento activar la hoja con el nombre dado (Pagina es una variable que vale 1, 2,..)
Catch ex As Exception
ApExcel.Sheets("General1").Copy(After:=ApExcel.Sheets("General" & Pagina))
ApExcel.ActiveSheet.Name = "General" & (Pagina )
'Si no existe, la crea y la activa
End Try
Lo que me ocurre es que ejecuta los comandos que hay después del Catch, aunque no se produzca error. Lo sé porque intento activar una hoja que sé seguro que existe, así que me crea otra más. No sé qué estoy haciendo mal.
Gracias anticipadas.
En un código estoy utilizando este bloque para detectar si existe una hoja con un nombre determinado en un documento EXCEL. Lo hago así:
Try
ApExcel.ActiveSheet.Name("General" & Pagina)
'Intento activar la hoja con el nombre dado (Pagina es una variable que vale 1, 2,..)
Catch ex As Exception
ApExcel.Sheets("General1").Copy(After:=ApExcel.Sheets("General" & Pagina))
ApExcel.ActiveSheet.Name = "General" & (Pagina )
'Si no existe, la crea y la activa
End Try
Lo que me ocurre es que ejecuta los comandos que hay después del Catch, aunque no se produzca error. Lo sé porque intento activar una hoja que sé seguro que existe, así que me crea otra más. No sé qué estoy haciendo mal.
Gracias anticipadas.
Valora esta pregunta


0