Arrêter une macro quand cellule vide...

[MARSEILLE13150]

Bonjour à tous,

Je souhaite simplement savoir le code a ajouter pour arrêter une macro dès que les lignes sont composées de cellules vides (la macro s'applique en cellule A, je souhaiterai un arrêt dès que la cellule B est vide).

Merci pour votre aide, ci dessous la macro :

Sub Macro15()
'
' Macro15 Macro
'
' Touche de raccourci du clavier: Ctrl+p
'
ActiveCell.FormulaR1C1 = _
"=RC[2]&""_FDS_453_CLP_""&RC[17]&""_""&RC[16]&"".pdf"""
Range("A1").Select
Selection.AutoFill Destination:=Range("A1:A60000")
Range("A1:A60000").Select
Range("A1").Select
End Sub


Merci bien, bonne journée.

 

[DoubleZero]

Re : Arrêter une macro quand cellule vide...

Bonjour, MARSEILLE13150, le Forum,

Comme ceci ?

Option Explicit
Sub Macro15()
Range("a1:a" & Range("b65536").End(xlUp).Row).FormulaR1C1 = "=RC[2]&""_FDS_453_CLP_""&RC[17]&""_""&RC[16]&"".pdf"""
End Sub

A bientôt 🙂

 

[MARSEILLE13150]

Re : Arrêter une macro quand cellule vide...

Bonjour,

Un grand merci, bonne journée, et bon week-end.

Bonjour, MARSEILLE13150, le Forum,

Comme ceci ?

Option Explicit
Sub Macro15()
Range("a1:a" & Range("b65536").End(xlUp).Row).FormulaR1C1 = "=RC[2]&""_FDS_453_CLP_""&RC[17]&""_""&RC[16]&"".pdf"""
End Sub

A bientôt 🙂