XL 2019 Changer la casse automatiquement d'un mot dans une cellule

Patrick.75019

XLDnaute Occasionnel
Bonjour à tous
J'aurai besoin
que dans une plage de cellules par exemple D5: D10
je voudrais que la première lettre lorsque j'écris dans cette cellule soit toujours soit automatiquement une majuscule
et les autres des minuscules

merci a l'avance de votre aide
 

Pièces jointes

  • Changer la casse automatiquement d'un mot dans une cellule.zip
    6.6 KB · Affichages: 7

Patrick.75019

XLDnaute Occasionnel
Bonsoir à tous

Suite du post #3 voir Pj

Slts
Bonsoir à tous

Suite du post #3 voir Pj

Slts
Bonjour Riton
j'ai teste en modifiant la plage de cellule du code F3:F33 de mon tableau ce que je n'avais pas fait en te le renvoyant (Sorry)
donc Sms s'affiche bien comme je le souhaite ,
mais aussitôt que j'écris sms ou SMS et que j'appuie sur la touche espace le Sms de la cellule 23 se copie
(le code de Farouk qui est different du tien faisait la même chose)
je vous remercie chaleureusement tous les deux de vos efforts

(Si tu trouves le pourquoi de la chose ca m'interresserait egalement d'essayer de comprendre )

bonne journée
 

Pièces jointes

  • Tableau casse Riton00.zip
    15.2 KB · Affichages: 9

patricktoulon

XLDnaute Barbatruc
bonjour à tous
je ne vois pas trop l’intérêt de remastériser la colonne a chaque changement de cellule

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    If Not Intersect(Target, [F3:F33]) Is Nothing Then Target.Value = Application.Proper(Target.Value)
    Application.EnableEvents = True
End Sub

pour l'auto completion qui ajoute l'existant c'est normal je sais pas si on peut déactiver cela
 

Patrick.75019

XLDnaute Occasionnel
bonjour à tous
je ne vois pas trop l’intérêt de remastériser la colonne a chaque changement de cellule

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    If Not Intersect(Target, [F3:F33]) Is Nothing Then Target.Value = Application.Proper(Target.Value)
    Application.EnableEvents = True
End Sub

pour l'auto completion qui ajoute l'existant c'est normal je sais pas si on peut déactiver cela
Encore une fois merci a tous de vos efforts (ca va le faire) ;)
je ferme la discussion
 

riton00

XLDnaute Impliqué
Bonjour Riton
j'ai teste en modifiant la plage de cellule du code F3:F33 de mon tableau ce que je n'avais pas fait en te le renvoyant (Sorry)
donc Sms s'affiche bien comme je le souhaite ,
mais aussitôt que j'écris sms ou SMS et que j'appuie sur la touche espace le Sms de la cellule 23 se copie
(le code de Farouk qui est different du tien faisait la même chose)
je vous remercie chaleureusement tous les deux de vos efforts

(Si tu trouves le pourquoi de la chose ca m'interresserait egalement d'essayer de comprendre )

bonne journée

Bonjour

La réponse est qu'il faut aller dans Fichier, Options, Options avancées, et dans options d'édition il faut décocher Saisie semi-automatique des valeurs de cellule... voilà

Slts
 

Discussions similaires

Réponses
9
Affichages
471

Statistiques des forums

Discussions
312 329
Messages
2 087 327
Membres
103 516
dernier inscrit
René Rivoli Monin