Discussion :

[seb92400]

Hello,

Je suis tombé sur le module de boite de message d'Arkham (et au passage, c'est génial !!! ) mais je n'arrive pas à faire une toute petite chose très importante...

En fait, je voulais simplement reproduire une boite de messages d'erreur personnalisée comme l'exemple donné dans le tutoriel, donc j'arrive à mettre de la couleur, du gras, des tabulations, de l'italique, des liens, etc... mais, je ne comprends pas comment mettre une variable d'erreur dans un texte au format RTF.

En fait, je voudrais écrire (exemple):

Description de l'erreur : Utilisation incorrecte de nul...

mais je ne sais pas comment insérer le Err.Description dans le texte RTF (ce qui devrait être qqch du genre) :

Description de l'erreur : & Err.Description

Je pense qu'il doit faloir insérer un caractère d'échappement ou autre... Et même en copiant/collant l'exemple fourni, ça ne fonctionne pas... . Enfin bref, un peu d'aide serait la bienvenue...

Merci d'avance...

[Arkham46]

ça dépend d'où vient ton texte RTF
la construction du texte étant du traitement de chaine classique :
- soit tu construis le texte en VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
"Blablabla Description de l'erreur : " & Err.Description & " Blablabla"

- soit tu stockes ton texte ailleurs, dans ce cas tu peux stocker un texte du style :

"Description de l'erreur : [ErreurDescription]"

puis remplacer ce que tu veux avec un Replace :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ltexte = Replace(ltexte, "[ErreurDescription]", Err.Description)

[seb92400]

Hi !

Je te remercie pour cette précision, je n'arrivais pas à me dépatouiller... Je vais essayer ça de suite (pour info, j'écris mon texte dans Word et je le place dans une table comme indiqué sur ton tuto...)

Bon Week-End

Et ça marche nickel !!! (j'ai juste enlevé les crochets autour des noms dans Word car lors de la conversion en RTF j'avais des {1544511} avant les crochets)...