¿Cómo ajustar automáticamente el ancho de columna en Excel?

En Excel, puedes ajustar el ancho de columna para que se adapte rápidamente al contenido de las celdas utilizando la función Ancho de Columna Automático. A veces, te gustaría que el ancho de columna se actualizara automáticamente en función del texto más largo de esa columna; es decir, cuando ingreses una cadena de texto larga en una celda, el ancho de la columna se redimensionará automáticamente para ajustarse a la longitud del contenido. ¿Es posible manejar esto en Excel?

Ajuste automático del ancho de columnas con código VBA

Ajuste automático del ancho de columnas con atajos de teclado

Ajuste automático del ancho de columnas con código VBA

Parece que hacer que el ancho de la columna se actualice automáticamente con la longitud del contenido de las celdas es un truco interesante; puedes usar el siguiente código VBA para completarlo.

1. Mantén presionadas las teclas ALT + F11, y se abrirá la ventana de Microsoft Visual Basic para Aplicaciones.

2. Luego, haz doble clic en ThisWorkbook en los objetos del Proyecto VBA en el panel izquierdo para abrir un módulo en blanco, y luego copia y pega el siguiente código VBA en el Módulo:

Código VBA: ajuste automático de columna en libro

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Update 20141127
Dim xCol, xoutCol
xCol = Target.Column
If xCol > 52 Then
xoutCol = Chr(Int((xCol - 1) / 52) + 64) & _
Chr(Int((xCol - 27) / 26) + 64) & _
Chr(Int((xCol - 27) Mod 26) + 65)
ElseIf xCol > 26 Then
xoutCol = Chr(Int((xCol - 1) / 26) + 64) & _
Chr(Int((xCol - 1) Mod 26) + 65)
Else
xoutCol = Chr(xCol + 64)
End If
Columns(xoutCol & ":" & xoutCol).AutoFit
End Sub

3. Luego guarda y cierra este código, y ahora, cuando ingreses texto largo en una celda, el ancho de la columna se ajustará para adaptarse al contenido automáticamente.

Ajuste automático del ancho de columnas con atajos de teclado

Si tienes múltiples columnas donde parte del contenido de las celdas está oculto como se muestra en la siguiente captura de pantalla, querrás redimensionar los anchos de columna de una vez para que se ajusten a sus contenidos. Los siguientes atajos de teclado pueden ayudarte.

1. Selecciona el rango de datos donde deseas redimensionar el ancho de columna.

2. Mantén presionada la tecla Alt y presiona H + O + I, y ahora los anchos de tus columnas se habrán ajustado automáticamente a sus contenidos de inmediato. Ver captura de pantalla:

Nota: Si estás usando Excel 2003 o una versión anterior, necesitarás usar estos atajos de teclado: ALT + O + C + A.

Artículos relacionados:

¿Cómo ajustar automáticamente la altura de fila de celdas combinadas en Excel?

¿Cómo cambiar el tamaño de la altura de fila o el ancho de columna para ajustar el texto en Excel?