[amélioration code VBA] tableau en mémoire

Bonjour à tous,

JoyeuxNoel a écrit :

Question subsidiaire, vous avez une façon plus rapide de coller les données en dernière ligne d'un tableau structuré que ça ?

With Feuil5.Range("BDD_livraisons")
        If .Rows.Count = 1 Then
            .Cells(1, 1).Resize(UBound(tablo, 2), UBound(tablo, 1)) = Application.Transpose(tablo)
        Else:
            .Cells(.Rows.Count + 1, 1).Resize(UBound(tablo, 2), UBound(tablo, 1)) = Application.Transpose(tablo)
        End If
End With

Moi j'ai ça :

With Feuil5.ListObjects("NOM_DE_TON_TABLEAU")
        .ListRows.Add
        .DataBodyRange.Rows(.ListRows.Count) = Application.Transpose(tablo)
End With

À tester, j'ai juste modifié mon code en fonction du tiens !