determinar existencia de Hoja

25/09/2006 - 22:02 por gergonvel | Informe spam
Buenas, les quiero molestar con un problema que tengo, y es que a través de
una macro necesito determinar si una hoja de un libro de excel existe. Esto
con la finalidad de eliminarla y poder crearla nuevamente con otros datos.

desde ya, muchas gracias
 

Leer las respuestas

#1 KL
25/09/2006 - 23:20 | Informe spam
Hola gergonvel,

Lo tipico es hacer lo siguiente:

Dim Hoja As Worksheet
On Error Resume Next
Set Hoja=Worksheets("MiHoja")
On Error GoTo 0
Application.DisplayAlerts=False
If Not Hoja Is Nothing Then
'...Lo que sea...
End If
Application.DisplayAlerts=True

Para el caso que planteas (salvo que la estructura del libro este protegida), ni siquiera es necesario determinar si la hoja
existe - simplemente intentar borrarla y y suprimir el error en caso de que la operacion falle:

On Error Resume Next
Application.DisplayAlerts=False
Worksheets("MiHoja").Delete
On Error GoTo 0
Application.DisplayAlerts=True

Saludos,
KL


"gergonvel" wrote in message news:
Buenas, les quiero molestar con un problema que tengo, y es que a través de
una macro necesito determinar si una hoja de un libro de excel existe. Esto
con la finalidad de eliminarla y poder crearla nuevamente con otros datos.

desde ya, muchas gracias

Preguntas similares