Eliminar Hoja

29/11/2007 - 12:56 por Fran | Informe spam
Haber si alguien me puede ayudar,
Necesito hacer una macro que si en la celda 155E aparece la palabra
SI elimine la pestaña con el nombre Pestaña Datos.


Gracias

Preguntas similare

Leer las respuestas

#1 Claudio Cienfuegos
29/11/2007 - 14:07 | Informe spam
Hola, como puedo obtener una planilla que me permita hacer las veces de un
sistema de scoring de creditos ??

gracias

Claudio Cienfuegos
Respuesta Responder a este mensaje
#2 Fran
29/11/2007 - 14:44 | Informe spam
On 29 nov, 14:07, "Claudio Cienfuegos" wrote:
Hola, como puedo obtener una planilla que me permita hacer las veces de un
sistema de scoring de creditos ??

gracias

Claudio Cienfuegos



Que tiene que ver esto con lo que yo he preguntado?
Respuesta Responder a este mensaje
#3 Juan M
29/11/2007 - 22:45 | Informe spam
"Fran" escribió
Haber si alguien me puede ayudar,
Necesito hacer una macro que si en la celda 155E aparece la palabra
SI elimine la pestaña con el nombre Pestaña Datos.




Hola Fran,

No está claro si el valor de la celda E155, lo escribes en el momento que
quieres eliminar la hoja o si es el resultado de alguna fórmula.
El siguiente código elimina la hoja Pestaña Datos.

En los eventos de la hoja escribe el siguiente código:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("E155") = "SI" Then
On Error Resume Next
Application.DisplayAlerts = False
Worksheets("Pestaña Datos").Delete
Application.DisplayAlerts = True
End If
End Sub

Si quieres que solo la oculte cambia

Worksheets("Pestaña Datos").delete
por
Worksheets("Pestaña Datos").Visible = xlVeryHidden

Están desactivados los avisos de eliminacion de hojas.

Un saludo,
Juan
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida