Convertir une colonne

Bonjour

J'aimerai convertir une colonne comme ceci:

En A5 =M. Jean-Philippe Bureau-Bonnard pour arriver comme ceci : jean_philippe_bureau_bonnard

en sachant que tous les noms ne sont pas composé et qu'il y a environ 600 noms dans la colonne "A"

Je vous remercie d'avance

Max

Bonjour,

Tu sélectionnes la colonne A et tu fais CTRL-F

remplace les tirets (-) par des soulignés (_)

ça le fait ?

Bonjour,

Une proposition VBA à étudier.

Les titres (M., etc...) ne sont pas pris en compte !...

ALT F8, exécuter la procédure.

Cdlt.

Public Sub ConvertString()
Dim lastRow As Long, i As Long, tbl, arr() As String
Const LROW As Long = 5, LCOL As Long = 13
    With ActiveSheet
        lastRow = .Cells(.Rows.Count, LCOL).End(xlUp).Row
        tbl = .Cells(LROW, LCOL).Resize(lastRow - LROW + 1).Value
        ReDim arr(1 To UBound(tbl))
        For i = LBound(tbl) To UBound(tbl)
            arr(i) = LCase(Replace(Replace(tbl(i, 1), "-", "_"), " ", "_"))
        Next i
        .Cells(LROW, LCOL).Resize(UBound(tbl)).Value = Application.Transpose(arr)
    End With
End Sub