Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Stopper Macro si toutes les cellules ne sont pas remplies !

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
H

hellocarioca

XLDnaute Occasionnel
Bonjour Forum,

j'ai une macro qui me permet de sauver une ligne de cellules vers une autre page. Qd la personne click sur le bouton "Sauvegarde" un message s'affiche disant:"Merci de vérifier si toutes les cellules ont bien été remplie
Voulez-vous Sauvegarder maintenant?"

Et meme si toutes les cellules ne sont pas remplies, la ligne peut être sauvée...
Je voulais donc savoir s'il était possible de bloquer la macro si toutes les cellules ne sont pas remplies en affichant un message: "Une ou plusieurs cellules sont vides, merci de bien vouloir les remplir!"

Merci bcp

Maud
 
Trier par date Trier par votes
Re : Stopper Macro si toutes les cellules ne sont pas remplies !

Bonjour,

Une des solutions pourrait être d'utiliser l'équivalent de la fonction nb d'Excel. Si tu connais par défaut la taille de ta plage, tu es en mesure de déterminer le nombre de cellules de ta plage.
En comparant le nombre de cellules avec le résultat renvoyé par la fonction nb, tu seras en mesure de savoir si toutes tes cellules sont remplies ou non.

Sylvain
 
Vote positif 0 Vote négatif
Re : Stopper Macro si toutes les cellules ne sont pas remplies !

Bonjour Sylvain,

merci pour ta réponse, mais je ne suis pas vraiment douée pour tout ce qui est d'écrire une macro.
Est ce que tu pourrais me donner les application qu'il faut choisir et comment je peux l'incorporer à ma macro qui ressemble à ça?:

' MacroSave Macro
'
' avertissement
Dim Msg, Style, Title, Response, MyString

' affichage du message

Msg = " WARNING !" & _
vbCrLf & " " & _
vbCrLf & " DATA IS GOING TO BE SAVED" & _
vbCrLf & "PLEASE BE SURE THAT ALL THE FIELDS HAVE BEEN POPULATED CORRECTLY" & _
vbCrLf & "-----------------------------------------------------------------------------------------" & _
vbCrLf & " DO YOU WANT TO SAVE NOW ?"

Style = vbYesNo + vbDefaultButton1
Title = "confirmation"
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then
MyString = "Yes"
Else
MyString = "No"
End
End If

Application.ScreenUpdating = False

'envoi vers relevé sauvegarde des données

'
ligne = 0
ligne_vide = False
Do While ligne_vide = False
ligne = ligne + 1
coord_cellule = "C" + Format(ligne)
If Worksheets("Dispute_DB").Range(coord_cellule).Value = "" Then
ligne_vide = True
Worksheets("Dispute_DB").Range(coord_cellule).Value = Worksheets("data").TextBox1.Value
End If
Loop

Merci bcp

Maud
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

U
  • Question Question
Autres [RÉSOLU] Macro qui bug et je ne sais pas la corriger!!!
Réponses
7
Affichages
449
un internaute
U
B
  • Question Question
XL 2019 Conserver les formules qui sont enregistrées dans des cellules
Réponses
8
Affichages
600
Phil69970
A
  • Question Question
XL 2016 Suppression contenu d'une plage de cellules en fonction de leur valeur
Réponses
4
Affichages
261
TooFatBoy
N
  • Résolu(e)
Microsoft 365 Rendre des bouton inactifs si des TextBox sont remplies ou pas.
Réponses
5
Affichages
310
NONO14
N
B
  • Question Question
XL 2021 Macro bloquée - Feuille protégée
Réponses
6
Affichages
351
Nain porte quoi
  • Résolu(e)
XL 2019 Macro qui ne prend pas en compte toutes les données d'une page
2
Réponses
15
Affichages
490
Julie29000
A
  • Question Question
Microsoft 365 Macro pour récupérer des colonnes qui ne sont pas conjointes
Réponses
4
Affichages
484
Anthony_51
A
K
  • Question Question
XL 2021 Mettre un message d'erreur si les cellules ne sont pas verrouillées
2
Réponses
18
Affichages
1 K
krolik serge
K
J
  • Question Question
XL 2019 Message d'erreur si cellules vides
2
Réponses
25
Affichages
2 K
piga25
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
530
AtTheOne
J
  • Question Question
XL 2021 Excel CSV vers XSL et ne pas écraser les données
Réponses
9
Affichages
471
sylvanu
M
  • Question Question
XL 2010 Supprimer les doublons contenant une valeur zéro avec trois conditions
Réponses
2
Affichages
609
Mody200
M
P
  • Résolu(e)
XL 2010 Vérifier contenu de même cellules sur plusieurs feuilles
Réponses
7
Affichages
715
Panda79360
P
D
  • Résolu(e)
Microsoft 365 Assistance pour optimisation d'un code VBA qui ne fonctionne pas comme souhaité
2
Réponses
21
Affichages
1 K
desto
D
  • Résolu(e)
XL 2019 Renvoyé à la ligne suivante si la ligne demandé n'est pas libre
Réponses
9
Affichages
343
Phil69970
S
  • Résolu(e)
XL 2016 Ne pas imprimer si 0 dans une cellule
Réponses
14
Affichages
694
AtTheOne
M
  • Question Question
Microsoft 365 cellules vides et boite de dialogue
Réponses
2
Affichages
499
michel.dupont
M
  • Résolu(e)
XL 2021 Extraction images depuis commentaire de cellule vers dossier.
11 12 13
Réponses
182
Affichages
4 K
patricktoulon
B
  • Question Question
Microsoft 365 Je souhaite que la cellule résultat soit vierge si les autres cellules sont vide.
Réponses
4
Affichages
599
blancolie
B
D
  • Question Question
XL 2013 Aide à création Fichiers, SMS, envoi
Réponses
0
Affichages
308
DARRIEUX
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…