Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo eliminar columnas enteras según el valor del encabezado en Excel?

En muchos casos, es posible que deba eliminar las columnas completas según el valor del encabezado en Excel. Por ejemplo, debe eliminar todas las columnas que contengan el valor "anterior" en el encabezado. En este tutorial, le mostraremos los métodos para eliminar columnas enteras según el valor del encabezado en detalles.

Eliminar columnas enteras según el valor del encabezado con código VBA

Eliminar columnas enteras según el valor del encabezado con Kutools para Excel

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las características avanzadas de 300 a Excel y aumenta su productividad en 80%
  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Kutools funciona con Office 2007-2019 y 365. Es compatible con todos los idiomas y es muy fácil de instalar o implementar. Funciones completas de prueba gratuita de 60-day.

flecha azul burbuja derecha Eliminar columnas enteras según el valor del encabezado con código VBA


Puede eliminar columnas enteras según el valor del encabezado con el código VBA. Por favor haz lo siguiente.

1. Prensa otro + F11 teclas simultáneamente para abrir el Aplicación Microsoft Visual Basic ventana.

2. En el Aplicación Microsoft Visual Basic ventana, haga clic recuadro > Módulo. Y luego copie y pegue el código debajo de la ventana del Módulo.

Código de VBA: eliminar columnas enteras según el valor del encabezado

Sub DeleteSpecifcColumn()
	Set MR = Range("A1:D1")
	For Each cell In MR
		If cell.Value = "old" Then cell.EntireColumn.Delete
	Next
End Sub

Nota: en el código, "antiguo"Es el valor del encabezado sobre el que desea eliminar toda la columna. Cambie a su valor de encabezado manualmente. Y A1: D1 es el rango de columna que quieres usar.

3. presione el F5 para ejecutar el código, la columna completa que contiene el valor del encabezado especificado se elimina inmediatamente.


flecha azul burbuja derecha Eliminar columnas enteras según el valor del encabezado con Kutools para Excel

Con Kutools for Excel, Seleccionar celdas específicas utilidad, puede seleccionar fácilmente todas las columnas que contienen el cierto valor de encabezado primero, y luego eliminar estas columnas seleccionadas a la vez. Por favor haz lo siguiente.

Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

1. Seleccione el rango que contiene las columnas que necesita eliminar y luego haga clic Kutools > Seleccionar > Seleccionar celdas específicas. Ver captura de pantalla:

2. En el Seleccionar celdas específicas cuadro de diálogo, seleccione la Toda la columna opción en el Tipo de selección sección, y en el Tipo específico lista desplegable, seleccione Equivale opción, luego escriba el valor del encabezado en el siguiente cuadro. Y finalmente haga clic en OK botón. Ver captura de pantalla:

3. Haga clic en el OK en otro cuadro de diálogo emergente, las columnas que contienen el valor del encabezado especificado se seleccionan inmediatamente.

4. Haga clic con el botón derecho en el encabezado de columna de la columna seleccionada, y luego haga clic Borrar desde el menú contextual. Entonces, todas las columnas seleccionadas se eliminan a la vez.

Si esta utilidad es útil, puede descarga y prueba la versión de prueba ahora!

Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Elias · 9 months ago
    Hey! This works well until you have two contiguous columns with the same header. Say your range is A1:A5, and A2 and A3 have the header 'old'. It will delete A2, but then the A3 will move to the place A2 used to occupy, and the code will skip it, as it will be looking at the new A3, the next cell on its range.
    • To post as a guest, your comment is unpublished.
      crystal · 9 months ago
      Hi Elias,
      As you mentioned, A2 and A3 have he same header "old". But they are in the same column, after applying the code, the whole column A will be removed immediately.
      I am not sure I get your point. Would be nice if you could provide screenshot of what you are trying to do.
  • To post as a guest, your comment is unpublished.
    Leonard Staggs · 2 years ago
    Sorry if this seems super basic but this is my first time trying vba. Using this how would I apply it to delete multiple column headers. I am actually trying to only keep certain header columns and delete the rest of a changing list.