"Greg" a écrit dans le message de news: 43187f35$0$976$
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la 1ere lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de modifier les cellules une par une.
Merci d'avance pour vos réponses.
Cordialement,
Greg
LSteph
Bonsoir, '*** Sub Initial() Dim c As Range Application.ScreenUpdating = False For Each c In [a:a] If Not IsEmpty(c) Then c.Offset(0, 1) = UCase(Mid(c, 1, 1)) _ & LCase(Mid(c, 2, Len(c) - 1)) End If Next End Sub '*** 'lSteph "Greg" a écrit dans le message de news: 43187f35$0$976$
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la 1ere lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de modifier les cellules une par une.
Merci d'avance pour vos réponses.
Cordialement,
Greg
Bonsoir,
'***
Sub Initial()
Dim c As Range
Application.ScreenUpdating = False
For Each c In [a:a]
If Not IsEmpty(c) Then
c.Offset(0, 1) = UCase(Mid(c, 1, 1)) _
& LCase(Mid(c, 2, Len(c) - 1))
End If
Next
End Sub
'***
'lSteph
"Greg" <news@wanadoo.fr> a écrit dans le message de news:
43187f35$0$976$8fcfb975@news.wanadoo.fr...
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la
1ere lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de
modifier les cellules une par une.
Bonsoir, '*** Sub Initial() Dim c As Range Application.ScreenUpdating = False For Each c In [a:a] If Not IsEmpty(c) Then c.Offset(0, 1) = UCase(Mid(c, 1, 1)) _ & LCase(Mid(c, 2, Len(c) - 1)) End If Next End Sub '*** 'lSteph "Greg" a écrit dans le message de news: 43187f35$0$976$
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la 1ere lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de modifier les cellules une par une.
Merci d'avance pour vos réponses.
Cordialement,
Greg
Vincnet.
Bonjour, Dans une nouvelle colonne, utilise la formule =NOMPROPRE(cellule) qui vas transformer chaque cellule comme tu le souhaites !
-- A+
V.
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la 1ere lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de modifier les cellules une par une.
Merci d'avance pour vos réponses.
Cordialement,
Greg
Bonjour,
Dans une nouvelle colonne, utilise la formule =NOMPROPRE(cellule) qui vas
transformer chaque cellule comme tu le souhaites !
--
A+
V.
Bonjour tout le monde,
Dans la colonne A, j'ai une liste de 200 noms en majuscule (ex. : DUPONT)
Je souhaiterais dans la colonne B mettre ces noms en minuscule sauf la 1ere
lettre en majuscule (ex. Dupont)
Est il possible de faire cela de manière automatique, plutôt que de modifier
les cellules une par une.