Ajout d'une condition à une Macro

Résolu/Fermé
Blondy485 Messages postés 70 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 30 octobre 2020 - 3 juin 2019 à 13:39
Blondy485 Messages postés 70 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 30 octobre 2020 - 3 juin 2019 à 15:20
Bonjour j'aimerais ajouter à ma macro une condition au début.

Si la colonne G ou la cellule A110 est vide alors annuler le trie.
Sheets ("print 1").Select

Colums("h:h").select.

https://www.cjoint.com/c/IFcaCZVHI4l

Merci d'avance et j'aimerais aussi qu'on me dise comment vous avez fait.

1 réponse

cs_Le Pivert Messages postés 7822 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 16 septembre 2022 716
3 juin 2019 à 15:07
Bonjour,

comme ceci:

Dim cellule As Integer
cellule = Application.WorksheetFunction.CountA(Columns(7)) 'colonne G
If cellule = 0 And Range("A110").Value = "" Then
MsgBox "on ne fait pas le tri"
Exit Sub
Else
MsgBox "on fait le tri"
'ton code de tri
End If



0
Blondy485 Messages postés 70 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 30 octobre 2020
3 juin 2019 à 15:20
Merci je vais essayer le tout ! .
0