
MACRO MOSTRAR OCULTAR COLUMNAS
Publicado por ALBERTO (2 intervenciones) el 11/04/2015 19:50:23
Hola buen día a todos, tengo un problema con una macro que cree para ocultar y mostrar columnas mediante un boton ToggleButton, solo que al ejecutarla no me oculta ni muestra las columnas programadas, si no otras, en este caso yo le pido a la macro ocultar las columnas ("e:g") y al ejecutarla me oculta las columnas ("b:r"), y hace lo mismo al mostrarlas, les adjunto mi archivo.
LA macro es ésta:
Private Sub ToggleButton1_Click()
Application.ScreenUpdating = False
If ToggleButton1 = False Then
Columns("E:G").Select
Selection.EntireColumn.Hidden = True
Range("C4").Select
Else
Columns("E:G").Select
Selection.EntireColumn.Hidden = False
Range("c4").Select
End If
Application.ScreenUpdating = True
End Sub
LA macro es ésta:
Private Sub ToggleButton1_Click()
Application.ScreenUpdating = False
If ToggleButton1 = False Then
Columns("E:G").Select
Selection.EntireColumn.Hidden = True
Range("C4").Select
Else
Columns("E:G").Select
Selection.EntireColumn.Hidden = False
Range("c4").Select
End If
Application.ScreenUpdating = True
End Sub
- 2015-DIESEL-Y-GASOLINAprueba.zip(52,9 KB)
Valora esta pregunta


0