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 de Sebas Torres
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
