Excel: Cómo expandir una celda para mostrar todo el contenido al hacer clic

En algunos casos, si el contenido de la celda es más largo que el ancho de la celda y hay valores en las celdas de la columna siguiente, solo se muestra una parte del contenido, como se ve en la captura de pantalla a continuación. Para evitar cambiar el ancho y alto de las celdas, puedes hacer clic en la celda y ver todo el contenido en la barra de fórmulas. Pero si la barra de fórmulas está oculta o es más corta que el contenido, ¿qué hacer? Aquí se presentan dos métodos que pueden mostrar el contenido de la celda en un cuadro de texto al hacer clic en ella.

Expandir celda para mostrar todo el contenido insertando un cuadro de texto con Controles ActiveX

Expandir celda para mostrar todo el contenido usando la Barra de Fórmulas Más Grande de Kutools para Excel

Nota: Los métodos proporcionados en este tutorial han sido probados en Excel 2021, puede haber algunas diferencias en distintas versiones de Excel.

1. Activa la hoja de cálculo donde deseas expandir la celda, haz clic en Desarrollador > Insertar > Cuadro de Texto (Controles ActiveX).

Si no hay una pestaña Desarrollador en la cinta, por favor muéstrala primero, consulta este tutorial Cómo Mostrar/Ocultar la Pestaña Desarrollador en la Cinta de Excel

2. Luego arrastra el cursor para dibujar un cuadro de texto con un ancho y alto que pueda mostrar el contenido más largo de las celdas. Recuerda el nombre de este cuadro de texto, aquí es TextBox1.

3. Haz clic derecho en el cuadro de texto, y haz clic en Propiedades en el menú contextual. Luego en el panel de Propiedades elige Sí de las listas desplegables en las secciones MultiLínea y Ajuste de Texto Luego cierra el panel de Propiedades .
  >>>  

O puedes seleccionar Sí de la lista desplegable en la sección AutoTamaño en el panel Propiedades, el cuadro de texto se ajustará automáticamente según la longitud del contenido de la celda en la que hagas clic.

4. Haz clic derecho en la pestaña del nombre de la hoja en la barra de estado, y haz clic en Ver Código en el menú contextual.

5. En la ventana Microsoft Visual Basic para Aplicaciones, copia y pega el siguiente código en el script en blanco.

VBA: Expandir celda para mostrar contenido

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub

Ten en cuenta que TextBox1 es el nombre del cuadro de texto que dibujaste, y A1:B4 es el rango en el que funciona este código, cámbialos según sea necesario.

6. Regresa a la hoja, haz clic en Desarrollador > Modo Diseño para salir del modo diseño.

Ahora, cuando hagas clic en la celda, aparecerá el cuadro de texto junto a ella y mostrará todo el contenido de la celda.

Si has instalado Kutools para Excel, la Barra de Fórmulas Más Grande que proporciona mostrará todo el contenido de la celda en un cuadro emergente cuando hagas clic, siempre que la actives haciendo clic en Kutools > Barra de Fórmulas Más Grande.

Consejos:

1. Con la Barra de Fórmulas Más Grande, además de ver el contenido de la celda activa, también puedes editar el contenido de la celda en la Barra de Fórmulas Más Grande.

2. Puedes cambiar el tamaño de la Barra de Fórmulas Más Grande arrastrando la esquina inferior derecha de la Barra.

3. Si seleccionas más de una celda, solo se mostrará el contenido de la primera celda de la selección en la Barra de Fórmulas Más Grande.

Para más detalles sobre la Barra de Fórmulas Más Grande, por favor visita su tutorial.