Y
Yagan
Guest
Bonjour, je suis néophite et j'ai besoin d'un petit coup de main pour comprendre et débuguer une ligne de commande commencant par Selection.AutoFill.
Voici la ligne incriminée :
Selection.AutoFill Destination:=Range(MaCelluleDepartEnJ, MaCelluleFin), Type:=xlFillDefault
Pour avancer j'aimerais déjà savoir que fait cette fonction ?
Voici la ligne incriminée :
Selection.AutoFill Destination:=Range(MaCelluleDepartEnJ, MaCelluleFin), Type:=xlFillDefault
Pour avancer j'aimerais déjà savoir que fait cette fonction ?
Code:
Sub CopierLesFormulesJusquEnBasDansRankingsCompletEtDetail()
Dim MaCelluleDepartEnJ As Variant
Dim MaCelluleDepartEnW As Variant
Dim MaCelluleFin As Variant
MaCelluleDepartEnJ = Range("J2").Address
MaCelluleDepartEnW = Range("W2").Address
MaCelluleFin = Range("A1").CurrentRegion.End(xlDown).Offset(0, 22).Address
If MaCelluleFin = Range("W65536").Address Then Exit Sub
Range(MaCelluleDepartEnJ, MaCelluleDepartEnW).Select
Selection.AutoFill Destination:=Range(MaCelluleDepartEnJ, MaCelluleFin), Type:=xlFillDefault