KutoolsforOffice — Una solución, cinco potentes herramientas.Lograr más con menos esfuerzo.Venta de marzo: 20 % de descuento

¿Cómo cambiar la altura de fila y el ancho de columna alternados en Excel?

AutorXiaoyang Fecha de modificación

Supongamos que tiene una hoja de cálculo grande con varias columnas o filas cuyo ancho o alto debe ajustarse de forma alternada. Si son pocas, puede modificar manualmente la altura de fila o el ancho de columna una por una. Pero, ¿cómo podría ajustar varias alturas de fila o anchos de columna a la vez en Excel?

Cambiar cada Altura de fila alternada con la función Filtro

Cambiar cada Altura de fila / Ancho de columna alternada con código VBA

Cambiar cada Altura de fila / Ancho de columna alternada con Kutools para Excel


Cambiar cada Altura de fila alternada con la función Filtro

Al utilizar la función Filtro, primero debe crear una columna auxiliar, aplicar después la función Filtro para filtrar las filas deseadas y ajustar a la vez la altura de todas las filas filtradas. Proceda del siguiente modo:

1. Junto a sus datos, en una celda vacía, introduzca los números 0 y 1 en la primera y segunda fila, respectivamente. Selecciónelos y arrastre el controlador de relleno hasta las celdas del rango cuya altura de fila desea ajustar. A continuación, consulte Copiar celdas desde el controlador de relleno y obtendrá un resultado como el que se muestra en la siguiente captura de pantalla:

una captura de pantalla de introducir manualmente 0 y 1 en la columna

2. A continuación, seleccione la columna auxiliar y haga clic en Datos > Filtro. Luego, haga clic en el botón doc-filter-button-1 y seleccione 0 o 1 en la lista desplegable. En este ejemplo, elegiré 0; consulte la captura de pantalla:

una captura de pantalla de filtrar todas las celdas con 0

3. Haga clic en Aceptar. Todas las filas que contienen el número 0 se habrán filtrado. Seleccione entonces dichas filas filtradas y haga clic en Inicio > Formato > Altura de fila; consulte la captura de pantalla:

una captura de pantalla de hacer clic en el botón Altura de fila

4. En el cuadro de diálogo Altura de fila, introduzca la altura de fila deseada; consulte la captura de pantalla:

una captura de pantalla de especificar una altura determinada de fila

5. A continuación, haga clic en Aceptar para cerrar este cuadro de diálogo y las alturas de fila filtradas seleccionadas se habrán ajustado. Por último, haga clic en Datos > Filtro para desactivar la función de filtro y sus alturas de fila se habrán modificado de forma alternada. Consulte la captura de pantalla:

una captura de pantalla de la nueva altura de fila

Notas:

1. Puede ajustar la altura de las filas de forma alternada, comenzando desde la primera fila.

2. Este método no sirve para modificar el ancho de las columnas.

3. Tras finalizar el procedimiento, podrá eliminar la columna auxiliar según sus necesidades.


Cambiar cada Altura de fila / Ancho de columna alternada con código VBA

Si necesita modificar tanto la altura de las filas como el ancho de las columnas, el siguiente código VBA le será de gran ayuda.

1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo y pegue el siguiente código en la ventana del módulo.

Código VBA: Cambiar cada Altura de fila alternada en una hoja de cálculo

Sub RowHeight()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Row height", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Rows.Count Step 2
    WorkRng.Rows(i).RowHeight = xInput
Next
End Sub

3. A continuación, pulse la tecla F5 para ejecutar este código. Aparecerá un cuadro de diálogo que le pedirá que seleccione el rango cuya altura de fila desea ajustar; consulte la captura de pantalla:

una captura de pantalla de seleccionar un rango tras ejecutar el código VBA

4. Luego, haga clic en Aceptar. Aparecerá otro cuadro de diálogo en el que deberá introducir la altura de fila necesaria; consulte la captura de pantalla:

una captura de pantalla de introducir la altura de fila

5. A continuación, haga clic en Aceptar y la altura de fila del rango seleccionado se habrá modificado de forma alterna a partir de la primera fila. Consulte la captura de pantalla:

una captura de pantalla del resultado

Notas:

1. Si desea ajustar el ancho de cada columna alternada, aplique el siguiente código VBA:

Código VBA: Cambiar cada Ancho de columna alternada en una hoja de cálculo

Sub CloumnWidth()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Cloumn width", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Columns.Count Step 2
    WorkRng.Columns(i).ColumnWidth = xInput
Next
End Sub

2. Si desea ajustar la altura de las filas o el ancho de las columnas a partir de la segunda fila o columna, simplemente seleccione el rango de datos desde esa segunda fila o columna.


Cambiar cada Altura de fila / Ancho de columna alternada con Kutools para Excel

Si ha instalado Kutools para Excel, su utilidad Seleccionar Filas/Columnas a Intervalos le permite seleccionar primero cada fila o columna alternada y, a continuación, modificar simultáneamente la altura de fila y el ancho de columna.

Kutools para Excel incluye más de 300 herramientas prácticas para Excel. ¡Pruébelo gratis sin limitaciones durante 30 días!Obtenerlo ahora.

1. Seleccione el rango de datos que desee utilizar.

2. Vaya a Kutools > Seleccionar > Seleccionar Filas/Columnas a Intervalos; consulte la captura de pantalla:

3. En el cuadro de diálogo Seleccionar Filas/Columnas a Intervalos, active la casilla Filas o Columnas en la sección Seleccionar, según sus preferencias. A continuación, en la sección Opciones, introduzca el Intervalo de y el número de Columnas o Filas en los campos correspondientes. En este ejemplo, elegiremos columnas; consulte la captura de pantalla:

una captura de pantalla de cambiar la altura de cada fila alternativa con Kutools for Excel

4. A continuación, haga clic en Aceptar y se habrán seleccionado las columnas alternas en la sección; consulte la captura de pantalla:

una captura de pantalla de seleccionar cada columna alternativa

5. A continuación, haga clic en Inicio > Formato > Ancho de columna e introduzca el valor deseado en el cuadro de diálogo Ancho de columna; consulte las capturas de pantalla:

una captura de pantalla de hacer clic en la opción Ancho de columna-2una captura de pantalla de introducir un nuevo ancho de columna

6. A continuación, haga clic en Aceptar y el ancho de columna se habrá modificado de forma alternada desde la primera columna.

una captura de pantalla del resultado con los nuevos anchos de columna

Notas:

1. Para seleccionar cada fila alternada, active la casilla Filas en el cuadro de diálogo Seleccionar Filas/Columnas a Intervalos en el paso 3.

2. Si desea ajustar la altura de las filas o el ancho de las columnas a partir de la segunda fila o columna, simplemente seleccione el rango de datos desde esa segunda fila o columna.


Artículos relacionados:

¿Cómo sombrear cada fila alternada en Excel?

¿Cómo eliminar rápidamente cada fila alternada en Excel?


Las mejores herramientas de productividad para Office

🤖KUTOOLS AI Asistente: Revolucione Análisis de datos basándose en:Ejecución Inteligente   |  Generar código|  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos|  Invocar Funciones mejoradas
Funciones populares:Buscar, resaltar o Marcar duplicados   |  Eliminar filas en blanco   |  Combinar Columnas o celdas sin perder datos   |   Redondeo sin usar fórmulas...
Super BUSCARV:Búsqueda vertical (VLookup) con múltiples criterios  |  Búsqueda vertical (VLookup) con múltiples valores  |   Búsqueda vertical (VLookup) entre varias hojas   |   Coincidencia difusa....
Lista desplegable avanzada:Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple....
Gestor de columnas:Añadir un número específico de columnas|Mover columnas|Alternar el estado de visibilidad de columnas ocultas|Comparar rangos y columnas...
Funciones destacadas:Cuadrícula de enfoque   |  Vista de diseño   |Barra de fórmulas mejorada   | Gestor de libros y hojas   |  Biblioteca de recursos(Texto automático)|  Selector de Fecha   |  Combinar Hojas de Cálculo  |  Cifrar/Descifrar celdas   | Enviar correos electrónicos desde una lista   |  Super Filtro   |   Filtro especial(Filtrar celdas con fuente en negrita/cursiva/tachado...) ...
Principales conjuntos de herramientas 15:12 Herramientasde texto(Agregar texto,Eliminar caracteres específicos, ...)|   50+Tiposde gráfico(Diagrama de Gantt, ...)|   40+ Fórmulas prácticas(Calcular la edad basada en la fecha de nacimiento, ...)|   19 Herramientasde inserción(Insertar Código QR,Insertar imagen desde ruta, ...)|   12 Herramientasde conversión(Convertir a palabras,Conversión de moneda, ...)|   7 Herramientasde combinación y división(Combinar filas avanzado,Dividir celdas, ...)|...y muchas más
Use Kutools en su idioma preferido: compatible con inglés, español, alemán, francés, chino y 40+ más idiomas.¡

Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...


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

  • Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
  • ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!

Todos los complementos de Kutools en un solo instalador.

Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.

ExcelWordOutlookTabsPowerPoint
  • Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
  • Un instalador, una licencia— configuración en minutos (compatible con MSI)
  • Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
  • Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
  • La mejor relación calidad-precio— ahorre frente a la compra individual de complementos