Como verificar si existe una hoja de calculo creada en el libro

22/08/2008 - 23:56 por Pregunton | Informe spam

Buenas Tardes a los partiticpantes de esta mesa de Ayuda.

Reciban un cordial saludo, y de antemano muy agradecido por la colaboración
que me puedan brindar.

Quiero que en visual excel se evalue con una macro si ya existe una hoja de
excel, por ejemplo si esta creada la hoja... Listado y sino esta creada que
muestre un mensaje que diga no esta creada la desea crear?.

Espero haberme hecho entender, no soy muy bueno para la redacción.

Nuevamente muchisimas gracias por su colaboración.

Atentamente;

OSWALDO GAITAN

Siga el debate

2 respuestas

Tengo una respuesta

DRAGON AGE™: INQUISITION – Matadragones

Leer las respuestas

#1 Héctor Miguel

23/08/2008 - 01:01 | Informe spam

hola, Oswaldo !

Quiero que en visual excel se evalue con una macro si ya existe una hoja
por ejemplo si esta creada la hoja... Listado y sino esta creada
que muestre un mensaje que diga no esta creada la desea crear?.

(p.e.)

Dim SeBusca As String, Existe As Boolean
SeBusca = "Listado"
On Error Resume Next
Existe = Worksheets(SeBusca).Type
On Error GoTo 0
If Existe Then Exit Sub
If MsgBox("La hoja " & SeBusca & " No existe" & vbCr & _
"Deseas crearla ?", vbQuestion + vbYesNo, _
"Paso intermedio") = vbNo Then Exit Sub
With ActiveSheet
With Worksheets.Add(After:=Worksheets(Worksheets.Count))
.Name = SeBusca
End With
.Select
End With

saludos,
hector.

Leer las otras respuestas

Preguntas similares

Busqueda sugerida :