Erreur Selection.autofill
Résolu
Ludo2110
Messages postés
6
Date d'inscription
Statut
Membre
Dernière intervention
-
Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention -
Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Voici le problème que je rencontre dans mon code:
-Une variable renvoie le numéro de la dernière ligne non vide de la colonne B: f
-je sélectionne la dernière cellule non vide de la colonne C
-je veux étirer sa formule sur la cellule (C;f+1) mais j'ai l'erreur: La méthode Autofill de la classe Range a échoué.
Voici mon code:
Merci pour vote aide!
Cordialement.
Ludovic.
Voici le problème que je rencontre dans mon code:
-Une variable renvoie le numéro de la dernière ligne non vide de la colonne B: f
-je sélectionne la dernière cellule non vide de la colonne C
-je veux étirer sa formule sur la cellule (C;f+1) mais j'ai l'erreur: La méthode Autofill de la classe Range a échoué.
Voici mon code:
Dim f As Integer
f = Range("B65536").End(xlUp).Row
Cells(f, 3).Select
Selection.AutoFill Destination:=Range("C" & (f + 1))
Merci pour vote aide!
Cordialement.
Ludovic.
3 réponses
Apprends à te passer des « Select » :
Cordialement
Patrice
Sub test()--
Dim f As Integer
Dim cel As Range
f = Range("B65536").End(xlUp).Row
Set cel = Cells(f, 3)
cel.AutoFill Destination:=cel.Resize(2)
End Sub
Cordialement
Patrice
Bonjour,
Sub test()
Dim f As Integer
f = Range("B65536").End(xlUp).Row
Cells(f, 3).Select
Selection.AutoFill Destination:=Range("C" & f & ":C" & f + 1)
End Sub
