Titre dans Affichage MsgBOx et InputBox

Version imprimable

09/01/2012, 10h11
debutVBA

Titre dans Affichage MsgBOx et InputBox
Bonjour à tous et à toutes.

En fait,j'aimerais afficher dans un MsgBOx un Titre :

Si le Titre est par exemple :Bienvenue

LE Message:Bonjour a tous et à toutes.

Le résultat doit me donner

Bienvenue

Bonjour à tous et à toutes

Et j'aimerais pouvoir faire exactement la meme chose dans un InputBox

exemple
Code:

1 2 Dim maVariable as byte maVariable =Application.InputBox("Saisissez la valeur de votre variable",type:=1)
j'aimerai lors de l'affichage
Si mon titre est :Resultat Variable

A l'affichage je souhaiterai obtenir

Resultat Variable

Saisissez la valeur de votre variable

Merci à tous et à toutes pour votre aide
;);)
09/01/2012, 10h21
jfontaine

Bonjour,

En faisant F1 (aide) sur la Msgbox ou Inputbox, tu verras que le titre est un paramètre de ces dernières

Citation:

Syntaxe

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

Syntaxe

InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])

suite réponse

salut jfontainte,

j'ai réadapté un peu le code et a l'affichage j'ai bien un titre

Code:

1
2
3
4
5
6
7
8
9
Message = "Les jours fériés du mois sont: " & listeJF
     Style = vbOKOnly
     titre = "*******AFFICHAGE DES JOURNEES FERIES********"
 
 
 
    If Aff Then
      MsgBox Message, Style, titre
    End If

Est -il possible aussi également de distingué le titre en lui changeant de police,de couleur etc??

j'ai tenté ceci mais cela ne fonctionne pas.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Message = "Les jours fériés du mois sont: " & listeJF
     Style = vbOKOnly
titre = "*******AFFICHAGE DES JOURNEES FERIES********"
 
With titre.Font
 
    .Size = 14
    .Name = "Euclid"
    .Underline = xlUnderlineStyleSingle
    .Bold = true
 
End With 
If Aff Then
      MsgBox Message, Style, titre
    End If

09/01/2012, 10h53
jfontaine

Citation:

Est -il possible aussi également de distingué le titre en lui changeant de police,de couleur etc??

Le format des msgbox est lié au format des fenêtres Windows et ne peut etre modifié.

Pour faire une Msgbox personnalisé il te faudra la créer avec un userform, mais la encore, tu ne pourras pas personnaliser le format du titre
09/01/2012, 11h07
debutVBA

re jfontaine,

Merci de ta réponse,

bon bah tant pis,je vais tester avec un User Form ,je vais voir la doc et reviens si j'ai plus d'info :ccool::ccool:

Merci en tout cas :roll:

re,

je sais pas si j'ai bien saisi les infos dans les tutos que j'ai pu trouver mais visiblement,un User form est associé a un bouton que l'on créé sur sa feuille excel.

Mais moi je souhaiterai que tout se passe directement dans la macro VBA ,sans avoir besoin de "switcher " avec la feuille,

Peut etre que cela n'est pas possible?

Merci en tout cas
09/01/2012, 11h11
jfontaine

Citation:

un User form est associé a un bouton que l'on créé sur sa feuille excel.

Non, une userform peut être appelée a partir de n'importe quel procédure (le bouton est juste une interface utilisateur)

http://silkyroad.developpez.com/VBA/UserForm/
10/01/2012, 10h21
debutVBA

suite réponse

re jfontaine

Merci de ta solution proposé.

:ccool::ccool:

c'est cool

Bonne journée