Microsoft 365 Personnaliser msg d'erreur Microsoft ou afficher msgbox

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 !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
J'espère que mon #Post vous trouvera en bonne santé 🙂

En cette période de confinement, comme dirait Michel ... "Il me vient des idées" lol 😉

Je travaille avec plusieurs Commerciales qui travaillent de chez elles (en France, à l'ile Maurice et en Tunisie)
Chacun de nous a son propre fichier :
Les fichiers sont tous les mêmes, sauf que chaque commercial à les infos de ses Clients dans son fichier
Grâce à vous tous, ce fichier "usine à gaz" comme dirait mon cher Gérard, Patrick et d'autres ... fonctionne super bien.
Quoi que fassent les utilisateurs, il n'y a que très peu ... voir quasiment pas de blocage.
Si blocage ou beug, j'aimerais passer un petit message "procèdure" pour en sortir.
Sans titre.jpg

J'ai cherché sur le net sans trouver de réponse et ce n'est certainement pas possible ?
Mais je brûle d'envie de vous poser la question 🙂
Avec les magiciens ... qui sait ?

Je joins un p'tit fichier test.
Avec mes remerciements,
Je vous souhaite une belle journée,
Amicalement,
lionel,
 

Pièces jointes

Dernière édition:
Bonjour,

oui, ça s'appelle de la gestion d'erreur. Une simple recherche t'en donnera les bases et des exemples.
Pour ce message plus spécifique, tu pourrais protéger tes feuilles à l'ouverture en utilisant le paramètre UserInterfaceOnly =True
Dans la mesure où tu considères comme normal de pouvoir écrire dedans, sinon : gestion d'erreur
eric
 
bonjour Lionel
VB:
Sub test1()
On Error GoTo gesterr
Sheets(33).Activate

gesterr:
MsgBox Err.Description & vbCrLf & "espece de cocombre masqué" & vbCrLf & "tu l'a vu ou toi le sheet 33!!!!!" & vbCrLf & " SAUCISSE!!!"
End Sub
😀 😛 😳😛
le msgbox d'erreur est personnalisé 😳
 
Re-Bonjour eriiiic, JM,
Bonjour Patrick,
@ eriiiic : Je n'arrive à faire fonctionner ta proposition en #Post2 🙁
@ JM : J'avais déjà consulté biens des liens et celui que tu me proposes. J'ai regardé à nouveau mais je n'ai pas trouvé la réponse à mon besoin 🙁
@ Patrick : Merci pour ton code mais ça ne répond pas à ma demande 🙂

Je continue mes recherches,
lionel,
 
@ eriiiic : Je n'arrive à faire fonctionner ta proposition en #Post2
Exemple :
VB:
Private Sub Workbook_Open()
    Const listeF As String = ",Feuil2,Feuil3,"
    Dim sh As Worksheet
    For Each sh In Worksheets
        If InStr(listeF, "," & sh.Name & ",") > 0 Then
            sh.Protect UserInterfaceOnly:=True, Password:="mot_de_passe"
        End If
    Next sh
End Sub

Sub test()
    ' écriture sans déprotection
    Sheets("Feuil2").[A1] = 5
End Sub

OUI, mais ce n'est pas la gestion des erreurs dont j'ai besoin 🙂
Je voudrais Personnaliser msg d'erreur Microsoft ou afficher msgbox
Les messages d'erreur sont en dur dans VBA.
Si tu veux les changer pas d'autre choix qu'une gestion d'erreur qui affiche ou fait ce que tu veux.
eric
 
Re
Bug=error = erreur donc on revient à ce que l'on t'a dit (mais que tu ne veux pas entendre...🙄)
Gestion des erreurs
Ou je suis encore plusss bourrin que je le pensais ou comme je le pense, ma demande ne concerne pas la gestion des erreur mais la possibilité de faire passer une information à l'affichage du message de Microsoft Visual Basic 😉
 
heu....
lol, j'essaie de reformuler ma question :
Est-il possible de modifier le message de Microsoft Visual Basic ou d'afficher un msgbox en même temps ?

la réponse viens de t'etre donné
Les messages d'erreur sont en dur dans VBA.
Si tu veux les changer pas d'autre choix qu'une gestion d'erreur qui affiche ou fait ce que tu veux.
eric

je te parlerais bien de hook mais comme ca sent le gaz chez toi je prendrais pas le risque 😉 😛😛😛
 
Re-eriiiic,
Merci pour ta proposition :
Les messages d'erreur sont en dur dans VBA.
Si tu veux les changer pas d'autre choix qu'une gestion d'erreur qui affiche ou fait ce que tu veux.

Mais ça ne répond pas à ma demande car je voudrais pouvoir avoir la possibilité de faire passer une information à l'affichage du message de Microsoft Visual Basic , quel que soit le type d'erreur.

A la vue de vos messages, je pense que ma demande n'est pas réalisable?
 
- 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
Retour