Ajout d'une condition à une Macro

Messages postés
53
Date d'inscription
lundi 4 avril 2016
Statut
Membre
Dernière intervention
18 septembre 2019
- - Dernière réponse : Blondy485
Messages postés
53
Date d'inscription
lundi 4 avril 2016
Statut
Membre
Dernière intervention
18 septembre 2019
- 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.
Afficher la suite 

1 réponse

Messages postés
6271
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 octobre 2019
398
0
Merci
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



Blondy485
Messages postés
53
Date d'inscription
lundi 4 avril 2016
Statut
Membre
Dernière intervention
18 septembre 2019
-
Merci je vais essayer le tout ! .
Commenter la réponse de cs_Le Pivert