Saltar al contenido

Recommended Posts

publicado (editado)

Saludos amigos espero estén bien 

En la actualidad  los datos provenientes de los TextBox 5, 6 y 7 se guardan en las Columnas H, I y O de las Hojas 58 (MATRIZ1) y Hojas59 (MATRIZ2) sin embargo cuando el texto es abundante no se visualiza completamente en las celdas correspondientes de allí que necesito que cada fila se ajuste al tamaño de la celda que contenga mayor cantidad de texto para lo cual he probado con la siguiente macro:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.EntireRow.AutoFit
End Sub

Sin embargo, dicha macro coloca todas las filas del tamaño del texto que contengan y lo que en realidad necesito es que dicha macro solo se aplique desde la Fila 5 en adelante.

Mucho les sabre agradecer la ayuda que me puedan dar

RCI PRUEBA..xlsm

Editado el por jues
publicado
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' Asegurarnos de que solo ajustamos las filas a partir de la fila 5
    If Not Intersect(Target, Me.Rows("5:" & Me.Rows.Count)) Is Nothing Then
        Me.Rows("5:" & Me.Rows.Count).AutoFit
    End If
End Sub

 

Conéctate para comentar

Podrás dejar un comentario después de conectarte



Conéctate ahora
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.