Discussion :

[Dalmito64]

Bonsoir,

Comme je ne suis pas très doué, je créé mes macro au moyen de l'enregistreur. J'exporte depuis un logiciel quelconque 2 colonnes de nombres (deux colonnes de même longueur, soit A et B). Je souhaite en colonne C faire la somme ligne à ligne des nombres de chaque cellule, soit C1=A1+B1, puis C2=A2+B2... ainsi de suite jusqu'à la fin de mes colonnes.
Quand j'enregistre ma macro, je copie ma formule que j'ai créé en C1, puis je me positionne sur B1 et là, j'appuie sur la touche "fin" de mon clavier et la flèche vers le bas afin d'atteindre le dernier enregistrement de ma colonne. Puis je vais sur la colonne C et recopie ma formule jusqu'à C1.
Mon problème est que l'enregistreur de macro conserve les références de toutes mes cellules ce qui me pose un problème lorsque je dois travailler sur des listes plus longues.
Question, comment faire pour automatiser la copie d'une cellule (vers le bas de la feuille de calcul) tant qu'il y a des données à exploiter dans la colonne qui précède ?

[Invité]

Bonjour

Pour cela il faut que tu détermines la dernière cellule.

Cette contribution d'Ouskel'n'or te donnera les informations nécessaires : http://www.developpez.net/forums/sho...d.php?t=331890

De plus en faisant des recherches sur le forum et la Excel, tu trouveras des réponses à ce sujet qui revient régulièrement.

Starec

[Dalmito64]

Merci,

Je n'avais pas réussi à trouver de réponse en parcourant le forum. Je vais maintenant étudier les infos du lien proposé.

[Dalmito64]

Bon, fort des explications précédemment fournies, je souhaite coller ma formule dans une plage qui commence à la cellule de la formule copiée et qui s'étend (dans la même et unique colonne) jusqu'à la dernière ligne non vide de la colonne qui précède. Colonne précédente qui ne fait bien sûr jamais la même longueur en fonction des exports....

[Gorfael]

Bon, fort des explications précédemment fournies, je souhaite coller ma formule dans une plage qui commence à la cellule de la formule copiée et qui s'étend (dans la même et unique colonne) jusqu'à la dernière ligne non vide de la colonne qui précède. Colonne précédente qui ne fait bien sûr jamais la même longueur en fonction des exports....

Salut

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sub test()
    Range("C1").AutoFill Destination:=Range("C1:C" & _
        IIf([A65536].End(xlUp).Row > [B65536].End(xlUp).Row, _
        [A65536].End(xlUp).Row, [B65536].End(xlUp).Row)), Type:=xlFillDefault
End Sub

Recopier la formule en C1 sur la plage C1:C et
si fin colonne A > Fin colonne B, dernière ligne non-vide de A, sinon celle de B

A+

[Dalmito64]

C'est exactement ça que je voulais. T'es vraiment trop fort.

Merci