Bonjour,
-Je voudrais simplement (façon de parler) créer une macro qui copie les lignes B17 à K20 de l'onglet 'calculs" dans l'onglet "récapitulatif" .
- Les lignes seraient copiées les unes à la suite des autres dans le tableau, au fur et a mesure de chaque copie...
merci.
*RVoul
En attendant une version anonymisée de ton fichier,
cette macro fait le job
VB:
Sub azinga()
Dim t
t = Sheets("calculs").Range("B17:K20").Value
Feuil2.Cells(Rows.Count, 1).End(xlUp)(2).Resize(UBound(t, 1), UBound(t, 2)).Value = t
End Sub
En attendant une version anonymisée de ton fichier,
cette macro fait le job
VB:
Sub azinga()
Dim t
t = Sheets("calculs").Range("B17:K20").Value
Feuil2.Cells(Rows.Count, 1).End(xlUp)(2).Resize(UBound(t, 1), UBound(t, 2)).Value = t
End Sub