Erreur Selection.autofill

[Résolu/Fermé]
Signaler
Messages postés
6
Date d'inscription
mardi 18 février 2014
Statut
Membre
Dernière intervention
25 février 2014
-
Messages postés
8539
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
20 juillet 2021
-
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:
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

Messages postés
8539
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
20 juillet 2021
1 704
Apprends à te passer des « Select » :
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
2
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 41713 internautes nous ont dit merci ce mois-ci

Messages postés
16042
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
22 octobre 2021
1 548
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
Messages postés
6
Date d'inscription
mardi 18 février 2014
Statut
Membre
Dernière intervention
25 février 2014

Bonjour,

Désolé je n'avais pas vu vos réponses. Merci beaucoup Patrice cela fonctione. En effet les select et selection.qqc sont un peu limités....

Bonne journée!

Cordialement.

Ludovic.
Messages postés
8539
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
20 juillet 2021
1 704
De rien, au plaisir de te relire sur le Forum

Cordialement
Patrice