Range.autofill

aline -  
Bonjour à tous,

J'ai peaufiné un bout de macro grâce aux divers sujets sur les forums, mais un bug persiste.
De plus sur les .Range un message "Erreur de compilation" s'affiche, pouvez-vous m'aider ?

Application.ScreenUpdating = False
Columns("F:F").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("F2").FormulaR1C1 = "=IF(OR(RC[-1]=""E10"",RC[-1]=""E101"",RC[-1]=""E9 : IMPLEMENTATION""))"

drLig = .Range("F" & Rows.Count).End(xlUp).Row
Range("F2").AutoFill Destination:=Range("F2:F" & drLig)

Merci à tous !

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. f894009
    Bonjour,

    Chez moi, l'erreur de compil est sur cette ligne
    drLig = .Range("F" & Rows.Count).End(xlUp).Row
    a cause du point devant range, ce qui est normal comme erreur vu le code a dispo
    1. algauthi
      Bonjour,

      Qu'entends-tu par normal ?
      Et comment suis-je censée remplacer ce .range ?

      Merci,
    2. f894009
      Bonjour,

      enlevez le point
    3. algauthi
      En enlevant le point c'est la ligne suivante qui bug
    4. f894009
      Re,
      quand vous avez l'erreur, clic sur debugage et passez le curseur souris sur drlig pour voir son contenu