OVH Cloud OVH Cloud

Mettre la 1er lettre en MAJ

5 réponses
Avatar
azza
Bonjour,
dans une cellule jaimerai inserer la fonction qui me permet de mettre en MAJ
le 1ér caratére , est-ce qu'une fonction de ce genre existe?
Merci.

5 réponses

Avatar
twinley
Bonjour,

J'ai vu passé cette question récemment, fais une recherche sur le mot
majuscule..

--
à+D
"azza" a écrit dans le message de
news:
Bonjour,
dans une cellule jaimerai inserer la fonction qui me permet de mettre en
MAJ

le 1ér caratére , est-ce qu'une fonction de ce genre existe?
Merci.




Avatar
azza
Salut,
j'ai oublier de preciser que c'est sous vba que je veux fair ca, apres
validation sur une cellule, seul le premier caractere se transformera en
MAJ.
Et merci pour le conseil de recherche, j'ai trouver effectivement, mais pas
dans le contexte que je cherche.
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de news:
#
Bonjour,

J'ai vu passé cette question récemment, fais une recherche sur le mot
majuscule..

--
à+D
"azza" a écrit dans le message de
news:
Bonjour,
dans une cellule jaimerai inserer la fonction qui me permet de mettre en
MAJ

le 1ér caratére , est-ce qu'une fonction de ce genre existe?
Merci.








Avatar
papou
Bonjour
Dans le code de ta feuille (clic droit sur l'onglet puis Visualiser le code)
exemple à adapter (ici sur la colonne A) :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 1 Or Target.Value = "" Or IsNumeric(Target.Value) Then
Exit Sub
Target = Application.Proper(Target)
End Sub

Cordialement
Pascal

"azza" a écrit dans le message de
news:
Bonjour,
dans une cellule jaimerai inserer la fonction qui me permet de mettre en
MAJ

le 1ér caratére , est-ce qu'une fonction de ce genre existe?
Merci.




Avatar
JF
Fonction =NOMPROPRE(abc) donne Abc
-----Message d'origine-----
Bonjour,
dans une cellule jaimerai inserer la fonction qui me
permet de mettre en MAJ

le 1ér caratére , est-ce qu'une fonction de ce genre
existe?

Merci.


.



Avatar
azza
Merci papou ça marche impec.

"papou" <cestpasbonprobin@çanonpluscg44_fr> a écrit dans le message de news:

Bonjour
Dans le code de ta feuille (clic droit sur l'onglet puis Visualiser le
code)

exemple à adapter (ici sur la colonne A) :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 1 Or Target.Value = "" Or IsNumeric(Target.Value) Then
Exit Sub
Target = Application.Proper(Target)
End Sub

Cordialement
Pascal

"azza" a écrit dans le message de
news:
Bonjour,
dans une cellule jaimerai inserer la fonction qui me permet de mettre en
MAJ

le 1ér caratére , est-ce qu'une fonction de ce genre existe?
Merci.