[VBA] exécuter l'opération jusqu'en bas

Fermé
totor51 Messages postés 10 Date d'inscription mardi 9 mai 2006 Statut Membre Dernière intervention 31 mai 2006 - Modifié le 23 oct. 2018 à 11:12
totor51 Messages postés 10 Date d'inscription mardi 9 mai 2006 Statut Membre Dernière intervention 31 mai 2006 - 22 mai 2006 à 10:09
bonjours eh oui encore moi
je ne connais pas a l'avance le nombre de ligne
je multiplie deux colones et met le resultat dans une 3 eme et moi je voudrai qu'il fasse la multiplication jusqu'en bas pour l'instant g fais ca :

Sub Multiplication()
'
Range("E3").Select
ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"
Selection.AutoFill Destination:=Range("E3", Range("E3").End(xlDown)).Select, Type:=xlFillDefault
Range("E3", Range("E3").End(xlDown)).Select

End Sub

mais ca marche po sinon j'arrive a le faire fonctionner en addmetant que je connaisse le nombre de ligne mais la c po le cas
alors merci de ce pencher sur ce petit probleme merci a tous
@+

1 réponse

Kobaya Messages postés 282 Date d'inscription vendredi 28 mai 2004 Statut Membre Dernière intervention 10 janvier 2008 214
19 mai 2006 à 13:05
salut,

Et oui, c'est moi, ton sauveur attitré ;-)

La bonne méthode, c'est celle-ci :
Sub Multiplication()
    '
    Range("E3").Select
    ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"
    Selection.AutoFill Destination:=Range("E3:E" & Range("D3").End(xlDown).Row), Type:=xlFillDefault
End Sub
9
totor51 Messages postés 10 Date d'inscription mardi 9 mai 2006 Statut Membre Dernière intervention 31 mai 2006
22 mai 2006 à 10:09
salut,
eh oui c'est encore toi mon sauveur
je te remercie la mon prog marche bien
si j'ai encore un soucis je penseai a toi mec
bon alller bye @+
0