Jump to content
Sign in to follow this  
dbuera

Macro para mostrar/ocultar columnas segun condicion

Recommended Posts

En esta vez tengo otra duda acerca de una macro, y es que tengo un documento con dos hojas.

A la primera hoja llamada (año) en la celda "A1" cambio el año manuamente (2013,2014...)

Y en la segunda hoja llamada (datos), todos los datos de los años por columnas.

Me gustaria una macro para que cuando ponga el año en la celda A1 de la hoja "año" solo me muestre las columnas del respectivo año en la hoja "datos".

Por ejemplo.

Celda A1 = 2013 que me muestre las columnas A:B

Celda A1 = 2014 que me muestre las columnas C: D

y asín succecivamente y que las otras las oculte

Gracias.

Share this post


Link to post
Share on other sites
En esta vez tengo otra duda acerca de una macro, y es que tengo un documento con dos hojas.

A la primera hoja llamada (año) en la celda "A1" cambio el año manuamente (2013,2014...)

Y en la segunda hoja llamada (datos), todos los datos de los años por columnas.

Me gustaria una macro para que cuando ponga el año en la celda A1 de la hoja "año" solo me muestre las columnas del respectivo año en la hoja "datos".

Por ejemplo.

Celda A1 = 2013 que me muestre las columnas A:B

Celda A1 = 2014 que me muestre las columnas C: D

y asín succecivamente y que las otras las oculte

Gracias.

Hola

Prueba esta macro de evento, pegala en el modulo de la hoja "año"

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address(0, 0) = "A1" Then

With Sheets("datos")
.Columns("A:D").Hidden = True
Select Case Target.Value
Case Is = 2013: .Columns("A:B").Hidden = False
Case Is = 2014: .Columns("C:D").Hidden = False
End Select
End With

End If

End Sub[/CODE]

Saludos

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  



×
×
  • Create New...

Important Information

Privacy Policy