Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Problème avec la fonction Selection.AutoFill

Yagan

XLDnaute Nouveau
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 ?

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
 

tototiti2008

XLDnaute Barbatruc
Re : Problème avec la fonction Selection.AutoFill

Bonjour Yagan,

AutoFill recopie une formule (comme avec la poignée de recopie)
ce code recopie les formules de J2 à W2 jusqu'en bas du tableau, a priori
 

Yagan

XLDnaute Nouveau
Re : Problème avec la fonction Selection.AutoFill

Merci

Donc le bug vient du faite que je n'ai qu'une seul ligne (initiale) dans ma colonne de Gauche (de référence) --> il ne peu pas descendre les données
Car lorsque j'ai plusieurs ligne je n'ai pas de problème.

Comment puis je contourner le bug ?
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…