Je souhaite arrêter l'exécution du code si le range Range(Cells(1, 6), Cells(100, 6)) est vide.
Voici mon code :
VB:
Public Sub CLICK()
Call Copier_Police
If Not IsEmpty(Sheets("DONNEES").Range(Cells(1, 6), Cells(100, 6))) Then
Call Retraitement
Call Resultats
Call Calcul
Else
MsgBox (" Erreur ! ")
End If
End Sub
Je constate que le programme ne s'arrête pas, pourriez-vous m'aider ?
Merci !
Hello
pour sortir de la macro, il faut ajouter exit sub , juste en dessous du msgbox
après. je pense que ca ne suffira pas, puisque si ta macro ne s'arrete pas, c'est parceque la condition "not isempty est toujours vraie et que tu ne vas jamais dans la partie "Else" de ta condition
sans avoir ton fichier, ni le détail de ta macro "Copier_Police", impossible de t'aider plus
Attention, je pense qu'une cellule qui contient une formule n'est jamais considérée comme étant vide, même si ladite formule retourne "".
Est-ce là le problème ?