Bonjour Forum,
je recherche une ligne de code qui me permettrait de détecter si une cellule est vide dans ma ligne (celle qui est sélectionnée quand j'active mon bouton)
Voici ce que j'ai essayé mais qui ne marche malheureusement pas...
Il faudrait que si une cellule vide dans la ligne, la macro s'arrête à ce niveau et que l'opérateur retourne sur la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub Macro2() Dim ligne As Integer, q As Integer ligne = ActiveCell.Row For q = A To BB If Range(q & 96) = "" Then msgbox "Une ou plusieurs cellules n'ont pas été remplies." & chr10 & _ "Veuillez les compléter avant de générer les rapports.", _ vbOKOnly + vbExclamation, "Information" End If Next q end sub
et si tout est bon, que la macro poursuive:
Je vous remercie de votre aide précieuse..
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 msgbox: "Une fois le rapport généré, la ligne d'évaluation sera verrouillée et vous ne pourrez plus la modifier" & chr10 & _ "Etes vous sûr de vouloir continuer?", vbYesNo + vb Exclamation, "Information"
Partager