Ver originales (Francés)

Calcular número de líneas VBA

Resuelto
Fitz_chev -  
 Fitz_Chev -
Bonjour à tous,

Para las necesidades de un trabajo, necesito poner el número de filas de mi tabla al final de la tabla, ya he logrado agregar mi TOTAL debajo de mi columna A, mi monto en las columnas M y N, pero necesito poner en la columna 2 y 3 el número de filas contenidas en mi tabla. Por supuesto, este código forma parte de una macro más grande, así que me gustaría conocer el código VBA para el cálculo de mis filas. Gracias de antemano.

Configuración: Windows 7 / Chrome 45.0.2454.85

2 respuestas

  1.
    Kuartz Mensajes publicados 852 Fecha de registro   Estado Miembro Última intervención   65
     
    De hecho, si quieres que la macro pueda adaptarse a tu tabla incluso si esta cambia, personalmente habría comenzado por integrar una variable que dé la última línea no vacía de la tabla: 

    Derniere_Ligne = Cells(Application.Rows.Count, 1).End(xlUp).Row 'Suponiendo que la columna 1 sea la más llena (la más lejana)


    Luego, para las sumas que ya has hecho, te invito a reutilizar este código, por ejemplo, la suma en A: 

    Cells(DL + 2, 1).Value = Application.WorksheetFunction.Sum(Range(Cells(1, 1), Cells(DL, 1))


    Después, para obtener el número de línea, puedes hacerlo, por ejemplo, para la columna B: 

    Cells(DL + 2, 2).Value = Cells(Application.Rows.Count, 2).End(xlUp).Row


    O para la columna C: 

    Range(DL + 2, 3).Value = Cells(Application.Rows.Count, 3).End(xlUp).Row


    Saludos cordiales.
    2