Discussion :

[foxer98]

Bonjour,

J'ai un petit problème j'ai crée un petit formulaire qui enregistre du text dans des céllules excel cependant quand j'enregistre le texte le texte ne respecte pas la casse qu'il a eu lors de la saisie excel met des majuscules apres chaque espace. Quelqu'un aurait t'il une idée de comment faire, sans tout mettre en minuscule ou en majuscule. Je vous remercie par avance.



Code permettant l'insertion des donnée:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ActiveCell.Offset(0, 0).Value = Application.Proper(Me!box_produit)
   ActiveCell.Offset(0, 1).Value = Application.Proper(Me!box_dft)
   ActiveCell.Offset(0, 2).Value = Application.Proper(Me!box_irp)
   ActiveCell.Offset(0, 3).Value = Application.Proper(Me!box_motif)
   ActiveCell.Offset(0, 4).Value = Application.Proper(Me!box_domaine)
   ActiveCell.Offset(0, 6).Value = Application.Proper(Me!box_blocprod)
   ActiveCell.Offset(0, 7).Value = Application.Proper(Me!box_depavion)
   ActiveCell.Offset(0, 8).Value = Application.Proper(Me!box_nbrprd)

[jfontaine]

Ton probleme se situe dans les options de correction automatique du menu outils

pour désactiver la majuscule en début de phrase

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.AutoCorrect.CorrectSentenceCap = False

[foxer98]

Merci de ta réponce mais ca ne fonctionne pas je viens de tester et toujours pareil

[AlainTech]

Excel met en majuscule la première lettre parce que tu le lui demandes.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Proper()

sert à ça.

C'est la fonction de feuille NOMPROPRE.
Si tu vas dans l'aide d'Excel (pas VBA) et que tu tapes NOMPROPRE, tu verras son usage.

Pourquoi l'as-tu introduite dans ton code?
Copié-collé sans comprendre?