[vba excel] macro initiales nom
Résolu
jeremac
-
jeremac -
jeremac -
Bonjour,
J'ai une colonne A de noms,prenoms
ex : Dupont, marc
je voudrais transformer avec une macro toute la colonne avec leurs initiales seulement
merci de votre aide
J'ai une colonne A de noms,prenoms
ex : Dupont, marc
je voudrais transformer avec une macro toute la colonne avec leurs initiales seulement
merci de votre aide
A voir également:
- [vba excel] macro initiales nom
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
1 réponse
Salut jeremac,
la procédure ci-dessous (avec la fonction associée) devrait répondre à ta question.
A toi d'adapter les séparateurs dans les fonctions Split et Join.
Remarque : ça ne marchera pas forcément pour les prénoms composés !
A suivre...
la procédure ci-dessous (avec la fonction associée) devrait répondre à ta question.
A toi d'adapter les séparateurs dans les fonctions Split et Join.
Remarque : ça ne marchera pas forcément pour les prénoms composés !
Sub TestInitiales()
Dim Cellule As Object
For Each Cellule In Range("A1:A10")
Cellule.Value = Initiales(Cellule.Text)
Next Cellule
End Sub
Function Initiales(Nom As String)
Dim Tableau, i As Integer
Tableau = Split(Nom, ", ")
For i = 0 To UBound(Tableau)
Tableau(i) = UCase(Left(Tableau(i), 1))
Next i
Initiales = Join(Tableau, ".")
End Function
A suivre...
jeremac
merci bcp , j'ai testé ça marche nikel