Ocultar Columna

Solo consultas sobre macros y código VBA Excel.
Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Responder
Roberto2010
Miembro Frecuente
Miembro Frecuente
Mensajes: 263
Registrado: 26 Jul 2010 15:58

Ocultar Columna

Mensaje por Roberto2010 » 17 May 2019 15:43

Estimados foristas, agradezco la ayuda que siempre me brindan.
Les comento
Quiero ocultar dos columnas cuyos títulos están siempre en la fila 1: "Apellido" y "Nombres".
"Apellido" y "Nombres" siempre estarán escritos de la misma forma, lo único que varía es la posición.
pero el tema es que no siempre están en la misma columna. Por ejemplo "Apellido" esta a veces en la Columna A y otras en la C o F, Etc.
Se puede hacer algo?
Gracias



Avatar de Usuario
Héctor Miguel
Miembro Frecuente
Miembro Frecuente
Mensajes: 5419
Registrado: 26 Mar 2005 18:31

Re: Ocultar Columna

Mensaje por Héctor Miguel » 18 May 2019 00:44

siempre hay mas de una forma de resolver situaciones en excel, para el caso que expones esta pudiera ser una

Código: Seleccionar todo

Sub ocultaNomApe()
  Dim celda As Range
  With ActiveSheet.UsedRange
    .EntireColumn.Hidden = False
    For Each celda In .Resize(1)
      celda.EntireColumn.Hidden = _
        LCase(celda) = "nombres" Or LCase(celda) = "apellido"
    Next
  End With
End Sub
saludos,
hector.



Roberto2010
Miembro Frecuente
Miembro Frecuente
Mensajes: 263
Registrado: 26 Jul 2010 15:58

Re: Ocultar Columna

Mensaje por Roberto2010 » 20 May 2019 14:07

Muchas gracias Héctor !
anda bien



Responder