Saltar al contenido
publicado

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

Solucionado por JSDJSD

Ir a la solución

Featured Replies

publicado
  • Solution
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

 

Crear una cuenta o conéctate para comentar