excel majuscule

[DOROTHEE]

Bonjour les amis,
J'ai soit un mot, soit une seule lettre à rentrer dans une cellule mais je voudrais qu'elle soit toujours en MAJUSCULE, qu'importe la saisie (même en cas d'oubli par rapidité d'enfoncer la touche MAJ)
Je sais d'ores et déjà que dans word il y a dans "formulaire" "champs" cette possibilité. Oui mais dans excel, comment faire ?
Merci pour vos réponses.
Doro

 

[Hervé]

bonjour

essaye ceci

en vba (alt + f11)

Private Sub Worksheet_Change(ByVal Target As Range)
Target = UCase(Target)
End Sub

salut
Hervé

 

[DOROTHEE]

Merci pour ta réponse, mais pourrais tu m'envoyer un fichier avec la macro ? là je n'y arrive pas.
dorothée2004@yahoo.fr
Merci si toutefois cela est possible.

 

[Hervé]

re

voici la pièce jointe.

salut
Hervé

 

[DOROTHEE]

c génial merci beaucoup on peut l'appliquer à une ou 2 colonnes ?
Bises

 

[DOROTHEE]

les 2 premières sur la gauche ?
Merci de ta réponse

 

[Hervé]

re

remplace ta macro par celle-ci :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 or Target.Column = 2 Then
Target = UCase(Target)
End If
End Sub

salut
Hervé

 

[DOROTHEE]

c trop fort ! ça répond idéalement à mes besoins. Merci Hérvé,je te fais la bise

 

[DOROTHEE]

suis nulle, je n'arrive pas à l'appliquer à monfichier entier (répertoire)

 

[DOROTHEE]

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Or Target.Column = 2 Then
Target = UCase(Target)
End If
End Sub


Target = UCase(Target) serait incompatible avec mon fichier existant

 

[DOROTHEE]

Je me vois mal recopier mon répertoire crée depuis 10 ans ! suis trop maladroite....
Je persiste et essaie de comprendre encore.
A +

 

[Hervé]

re

Je ne comprend pas dorothée

tu cherches une macro pour te forcer à saisir en majuscule ou tu cherches à modifier un "répertoire" (téléphonique ????) .

parce que s'il s'agit de modifier de l'existant il y a la fonction MAJUSCULE.

quel version d'excel as-tu ?

en attendant de tes nouvelles.

salut
Hervé

 

[DOROTHEE]

Bonjour, et désolée pour mes énigmes, je t'explique :

C pour mes prochaines saisies, quand je rempli mon répertoire, je pensais possible d'instaurer les maj sur les 2 premières colonnes à partir donc de ce fichier existant. Apparamment je vais devoir utilisé comme base la feuille que tu m'as fait parvenir et recopier . Je pensais qu'il était possible de faire changer les choses en cours...

Doro
merci pour ta patience

 

[DOROTHEE]

excel 2003

 

[Hervé]

bonjour dorothée


place la macro suivante dans le module thisworkbook de ton document existant, et revalides tes données en selectionnant simplement ta cellule (double click et entré), tes données seront modifié automatiquement :

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 1 Or Target.Column = 2 Then
Target = UCase(Target)
End If

End Sub

salut
Hervé