VBA - Autofill jusqu'à première cellule vide de la colonne.

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

rounil09

XLDnaute Occasionnel
Bonjour,

Soit les cellules de la feuille BDEP :
B2=1
B3=2

Et la macro qui fonctionne
Range("B2:B3").Select
Selection.AutoFill Destination:=Range("B2:B350"), Type:=xlFillDefault

Malgré quelques exemples que j’ai pu trouver, je n’arrive pas à modifier le code pour faire arrêter l’autofill à la première cellule vide de la colonne B au lieu de la ligne B350.

Par avance merci de votre aide.
 
Re : VBA - Autofill jusqu'à première cellule vide de la colonne.

Bonjour rounil09.


Essayez :​
VB:
Sub toto()

  With Range("B2:B3")
   If Not IsEmpty(.Cells(2).Offset(1)) Then .Cells.AutoFill Destination:=Range(.Cells(1), .Cells(1).End(xlDown)), Type:=xlFillDefault
  End With
End Sub


Bonne journée.


ℝOGER2327
#7532


Mardi 24 Phalle 141 (Sainte Orchidée, aumonière - fête Suprême Quarte)
17 Fructidor An CCXXII, 5,1185h - cardière
2014-W36-3T12:17:04Z
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
455
Retour