MsgBox de bienvenue, Msgbox d'erreur [Résolu]

tchobisounours 7 Messages postés vendredi 31 mars 2006Date d'inscription 6 avril 2006 Dernière intervention - 6 avril 2006 à 13:27 - Dernière réponse : ta4444 36 Messages postés vendredi 17 mars 2006Date d'inscription 6 novembre 2006 Dernière intervention
- 6 avril 2006 à 17:45
Salut, je crée un logiciel de calcul sous VBA(alt +F11 sous excel). Mes calculs n'ont aucun lien avec un classeur Excel, tous est dans l'userform. Notre professeur va compiler le projet avec le logiciel par la suite.
Je souhaiterais faire apparaître une MsgBox, lorsque l'utilisateur lance l'application.

Voila ce que j'ai fait:
Private Sub UserForm_Click()
MsgBox "Bienvenue"


End Sub
Ca ne fonctionne pas.

D'autre part, je voudrais faire apparaitre un message d'erreur si l'utilisateur utilise des . pour rentrer des nombres décimaux.

On error Goto Erreur
Erreur : MsgBox"Veuillez s'il vous plait utiliser les virgules pour entere vos c"

Donne moi du couscous Chérie.
Afficher la suite 

2 réponses

Meilleure réponse
econs 4066 Messages postés mardi 13 mai 2003Date d'inscription 23 décembre 2008 Dernière intervention - 6 avril 2006 à 13:36
3
Merci
Salut,



pour le message de bienvenue, tu t'es tout simplement trompé d'évenement.




Private Sub WorkBook_Open()

MsgBox "Bienvenue !"

End Sub



Et ceci à placer à l'endroit où tu veux valider tes nombres :



If Instr(1,CStr(monChiffreDecimal),".") > 0 Then

MsgBox "Veuillez SVP utiliser les virgules pour entrer vos chiffres"

End If


Manu

Merci econs 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 74 internautes ce mois-ci

Meilleure réponse
ta4444 36 Messages postés vendredi 17 mars 2006Date d'inscription 6 novembre 2006 Dernière intervention - 6 avril 2006 à 17:45
3
Merci
ou, plutot que de faire une erreur (à moins que ce ne soit demander par le prof) faire systématiquement un :

monChiffreDecimal = Replace((monChiffreDecimal),".", ",")

Merci ta4444 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 74 internautes ce mois-ci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.