Majuscule

Salut,

"Ayrton [ASC]"
| Bonsoir à tous,
|
| Je suis à ma recherche d'un bout de code qui pemrettrait, dans une zone de
| texte, que la première lettre du nom soit automatiquement en majuscule.
|
| Merci
|
| PS : je suis sous Acess 2002
|

Pour l'affichage
Dans vba : StrConv(tazonedetexte.Value, vbpropercase)
Dans l'éditeur de requetes SQL : StrConv([tonchamp];3)

à+
--
Arnaud
-----------------------------------
http://users.skynet.be/mpfa/
-----------------------------------

Bonjour,

" Anor "

Salut,
Pour l'affichage
Dans vba : StrConv(tazonedetexte.Value, vbpropercase)
Dans l'éditeur de requetes SQL : StrConv([tonchamp];3)

Impeccable ;-) Merci beaucoup Anor

--
Cordialement
Christophe

Oupss ! ! ! J'ai été trop vite ;-)

Le SQL fonctionne très bien mais je rencontre une erreur en vba ; un message
me dit : Attendu : Je ne comprends pas trop surtout qu'en consultant l'aide en ligne, la
syntaxe donnée est la même que celle que tu m'indiques.

A moins que je fasse une ereur ?
J'ai un champs Nom dans mon form et j'ai mis la syntaxe vba sur évènement
After_Update de mon champs de façon à ce qu'après avoir saisi le nom, la
première lettre se retrouve en maj.
C'est comme cedla que je pensais faire...

Merci

--
Cordialement
Christophe

Ayrton [ ASC ] wrote:

Oupss ! ! ! J'ai été trop vite ;-)

Le SQL fonctionne très bien mais je rencontre une erreur en vba ; un
message me dit : Attendu : > Je ne comprends pas trop surtout qu'en consultant l'aide en ligne, la
syntaxe donnée est la même que celle que tu m'indiques.

En fait, StrConv est une fonction, et renvoit donc une valeur en sortie. Il
faut que tu la récupères, en plus c'est ton résultat attendu.
Essaie donc comme suit :
tazonedetexte = StrConv(tazonedetexte.Value, vbpropercase)


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Bonjour,

" Gafish "

En fait, StrConv est une fonction, et renvoit donc une valeur en
sortie. Il faut que tu la récupères, en plus c'est ton résultat
attendu.
Essaie donc comme suit :
tazonedetexte = StrConv(tazonedetexte.Value, vbpropercase)

Ok c'est bon ça marche ;-)
Merci beaucoup

Juste une petite chose : Tu me dit que c'est une fonction, donc est ce que
je peux tester dans un module ? C'est juste pour info et pour parfaire mes
connaissances !( Remarque, y a du boulot ! ;-)
Je n'arrive pas à trouver la syntaxe qui me permettrait de " tester ".

Sinon; e névènement after_Update, ça marche !
Merci encore

--
Cordialement
Christophe

Ayrton [ ASC ] wrote:

Juste une petite chose : Tu me dit que c'est une fonction, donc est
ce que je peux tester dans un module ?

C'est à dire ? Quel test veux tu faire exactement ?
En tout cas, tu peux très bien si tu veux faire les tests suivants :
dans un nouveau module, tu te crées une sub ou une fonction bidon, à
l'interieur, par exemple pour le StrConv, tu peux écrire ces quelques lignes
:
Dim txtTest as String
txtTest = "A METTRE EN NOM PROPRE"
txtTest = StrConv(TxtTest,vbpropercase)
msgbox tstTest

ainsi tu vois s'afficher dans une boîet de dialogue le résultat. Je ne sais
pas si c'est ce que tu souhaitais.

C'est juste pour info et pour
parfaire mes connaissances !( Remarque, y a du boulot ! ;-)
Je n'arrive pas à trouver la syntaxe qui me permettrait de " tester ".

Tu peux dans ton code te mettre de temps en temps des msgbox pour voir
s'afficher à l'execution des états de tes variables.
Si ca plante, dans le debugger, si tu positionnes ta souris sur une valeur,
tu vois dans quel état elle était au plantage.
Tu peux également utiliser les outils tels que les espions, les pas à pas
détaillés...regarde dans l'aide sur ces fonctions.

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Bonjour,

" Gafish "

C'est à dire ? Quel test veux tu faire exactement ?
En tout cas, tu peux très bien si tu veux faire les tests suivants :
dans un nouveau module, tu te crées une sub ou une fonction bidon, à
l'interieur, par exemple pour le StrConv, tu peux écrire ces quelques
lignes

Dim txtTest as String

txtTest = "A METTRE EN NOM PROPRE"
txtTest = StrConv(TxtTest,vbpropercase)
msgbox tstTest

C'est exactement ce que je voulais ;-) Je ne savais simplement pas trop
comment déclarer ma variable !!

Tu peux dans ton code te mettre de temps en temps des msgbox pour voir
s'afficher à l'execution des états de tes variables.
Si ca plante, dans le debugger, si tu positionnes ta souris sur une
valeur, tu vois dans quel état elle était au plantage.
Tu peux également utiliser les outils tels que les espions, les pas à
pas détaillés...regarde dans l'aide sur ces fonctions.

Ok ; j'en prends bonne note
Merci pour tout

Bonne journée

--
Cordialement
Christophe

Salut,

"Ayrton [ ASC ]"

| C'est exactement ce que je voulais ;-) Je ne savais simplement pas trop
| comment déclarer ma variable !!


histoire de ne pas laisser croire que j'ai abandonné le fil :-))

tu peux tester une telle fonction de la manière suivante :

sub test()
msgbox strconv("MON TEXTE A CONVERTIR",vbpropercase)
end sub

Et tu déroules pas à pas en appuyant sur la trouche f8 ;-)

A+
L'autre Arnaud

mais mon petit anor, qui pourrait croire que tu abandonne un fil comme çà :o)) 3stone ? oui, il est assez mauvaise langue

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net

<Anor> a écrit dans le message de news: %23i7iBHDnFHA.2080@TK2MSFTNGP14.phx.gbl...

Salut,

"Ayrton [ ASC ]"

| C'est exactement ce que je voulais ;-) Je ne savais simplement pas trop
| comment déclarer ma variable !!


histoire de ne pas laisser croire que j'ai abandonné le fil :-))

tu peux tester une telle fonction de la manière suivante :

sub test()
msgbox strconv("MON TEXTE A CONVERTIR",vbpropercase)
end sub

Et tu déroules pas à pas en appuyant sur la trouche f8 ;-)

A+
L'autre Arnaud

Bonjour *Anor*
Dans ton message de news:%23i7iBHDnFHA.2080@TK2MSFTNGP14.phx.gbl,
Tu as pensé très fort :-(*)

Salut,

Salut Anor,

histoire de ne pas laisser croire que j'ai abandonné le fil :-))

Mais je ne me serai jamais paermis de penser ça ;-)

tu peux tester une telle fonction de la manière suivante :

sub test()
msgbox strconv("MON TEXTE A CONVERTIR",vbpropercase)
end sub

Et tu déroules pas à pas en appuyant sur la trouche f8 ;-)

Merci beaucoup...............................................l'autre Arnaud
;-)
Bien à toi

--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm