de macro a formule

[Evelynetfrancois]

bonsoir à tous les amoureux (d Excel bien sur)

voila je cherche à trouver l equivalance
d une macro ci dessous , en formule

Sub report()
Rows(Range('A1').End(xlDown).Row - 1).Select
Range('C1') = ActiveCell.Offset(0, 1)
End Sub

eventuellement j ai joint le petit exemple
MERCI pour tout et bonne soirée à vous tous
E et F [file name=report_20060214210049.zip size=8242]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/report_20060214210049.zip[/file]

 

[Dugenou]

Salut,

en c1 =DECALER(B1;NBVAL(A1:A3000)-1;0;1;1)
si tes valeurs peuvent aller jusqu'à la ligne 3000.

Cordialement

Edition : et si il y a bien une valeur dans chaque cellule jusqu'à la dernière !

Message édité par: Dugenou, à: 14/02/2006 22:01

 

[Evelynetfrancois]

Merci beaucoup dugenou
je n ai que 12 valeurs !!! alors j adapte...
mais c'est exactement ca !!!!!
bonne soirée et encore merci !!
E et F