Como bloquear celdas y una hoja de excel

Tengo la siguiente macro y quiero poder ocultar ciertas celdas y la hoja

Private Sub TextBox1_Change()
Dim Criterio As String
If Hoja1.TextBox1.Value <> "" Then
    Criterio = Hoja1.TextBox1.Value
    Range("$A$6:$K$873").CurrentRegion.AutoFilter Field:=1, Criteria1:=Criterio
Else
    ActiveSheet.Range("$A$6:$I$873").AutoFilter Field:=1
End If
End Sub

1 Respuesta

Respuesta
1

No se bien que hace tu código porque no tengo una Pc en este momento para probarlo pero con esta línea dejas la hoja bien oculta y nadie puede verla

Hoja1.Visible = xlSheetVeryHidden

Y con esta la haces  visible nuevamente 

Hoja1.Visible = xlSheetVisible

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas