Prob majuscule et minuscule

Bonjour,

Je voudrais vous soumettre le problème suivant

j'ai deux colonnes :

la colonne A correspond au nom

la colonne B correspond au prénom

Je souhaiterais savoir comment faire en sorte à ce que la colonne A (NOM) soit obligatoirement écrite en MAJUSCULE. Autrement dit, si je renseigne cette colonne en minuscule, qu'elle se tranforme automatiquement en MAJUSCULE.

et pour la colonne B, je voudrais que la première lettre du prénom soit Majuscule et les suivantes en minuscules.

Je vous remercie par avance de votre aide.

Cordialement

THIERRY

Edit par Nad : sujet déplacé dans le forum Questions

Bonjour à tous,

petite macro :

Sub majuscule()
        [a1].Select
    Do While ActiveCell <> ""
        ActiveCell = UCase(ActiveCell)
        ActiveCell.Offset(0, 1) = Application.Proper(ActiveCell.Offset(0, 1))
        ActiveCell.Offset(1, 0).Select
    Loop
End Sub

on doit pouvoir améliorer la syntaxe, mais çà marche !

amicalement

Claude.

Bonjour,

tu mets ce code dans l'évènement de feuille (clic droit sur le nom de l'onglet, Visualiser le code)

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

Ainsi, dès que tu rentres un nom, celui-ci sera en majuscule, et pour le prénom, la première lettre en majuscule

Merci beaucoup pour vos réponses si rapides

bien cordialement

THiery