Message erreur

Bonsoir a tous

Je reviens vers vous pour un petit souci . Dans le usf j'ai une listbox ( listbox1) . quand je sélectionne un bâtiment (A01 chaufferie par exemple) un nom de fichier viens remplir ma listbox. pour ouvrir ce fichier je le sélectionne dans listbox puis bouton "Cliquer". cela fonctionne très bien , mais si l'utilisateur oublie de sélectionner et clique directement alors message vba "fin débogage. "

il y a t'il un moyen d'avoir a la place un message du type " veuillez sélectionner le nom de fichier" et permettre de revenir sur le usf sans qu'il se ferme et d'être obligé de recommencer depuis le début.

merci a vous


34excel-ssi.xlsx (93.72 Ko)

oups le fichier


12excel-ssi.xlsm (93.74 Ko)

un peu de mal a charger le bon fichier dsl

Bonjour

Tu n'as aucune macro dans les fichiers que tu as postés

Fournis le bon fichier (extension .xlsm) avec la/les macros

oui le fichier est un peu lourd

Bonjour,

Si tu mettais le bon fichier ! Aucun ne contient de Userform !

Bonjour

Bonjour MFerrand

chtimili a écrit :

oui le fichier est un peu lourd

Compresse le et si toujours >300 Ko passe par cjoint

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

merci pour l'info j'espere que vous pourrez ouvrir


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

dur dur

Bonjour

Une solution simple

Rajoutes les lignes dans la macro Private Sub CommandButton4_Click

Private Sub CommandButton4_Click()
  Dim sNomFic As String, sDos As String
  If Me.ListBox1.ListIndex = -1 Then
    MsgBox "Veuillez sélectionner le nom du fichier"
    Exit Sub
  End If
  ' .
   ' .

merci beaucoup cela fonctionne

Salut Banzai !

Rondement réglé !

Rechercher des sujets similaires à "message erreur"