Microsoft 365 Personnaliser msg d'erreur Microsoft ou afficher msgbox

eriiic

XLDnaute Barbatruc

• 20 Avril 2020

• #2

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

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #3

Bonjour eriiiic, JM,
Merci pour vos messages
je regarde dès que j'ai un p'tit moment et je vous dis,
lionel,

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 20 Avril 2020

• #4

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é

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #5

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,

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #6

OUI, mais ce n'est pas la gestion des erreurs dont j'ai besoin
Je voudrais Personnaliser msg d'erreur Microsoft ou afficher msgbox

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 20 Avril 2020

• #7

re
alors a mon avis ton besoins a mal été exprimé Lionel

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #8

Re-Patrick
Le cocombre que dois être a du mal expliqué.
lol, il me semblait pourtant avoir fait de mon mieux mais NON
et je ne sais pas comment dire différemment mais je vais y réfléchir
lionel,

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #9

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 ?

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 20 Avril 2020

• #10

@ eriiiic : Je n'arrive à faire fonctionner ta proposition en #Post2

Cliquez pour agrandir...

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

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #11

Staple1600 à dit:

Re
Bug=error = erreur donc on revient à ce que l'on t'a dit (mais que tu ne veux pas entendre...)
Gestion des erreurs

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 20 Avril 2020

• #12

heu....

arthour973 à dit:

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 ?

Cliquez pour agrandir...

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

Cliquez pour agrandir...

je te parlerais bien de hook mais comme ca sent le gaz chez toi je prendrais pas le risque

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 20 Avril 2020

• #13

on t'aime Staple1600 reviens !!!

oui a mon avis Lionel est dans le gaz pour ne pas dire dans le paté aujourd'hui

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #14

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?

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 20 Avril 2020

• #15

"on t'aime Staple1600 reviens !!!"
lol ça dépend des moments

 

Vote positif 0 Vote négatif