Bonjour à tous et à toutes,

Mon objectif est de convertir dans une colonne avec un nombre de ligne variable les points en /
exemple : 12.01.2012 transformé en 12/01/2012

j'ai testé un code mais ça plante, MERCI D'AVANCE DE VOTRE AIDE

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub changerendate()
 
Dim LinFin As Long
LiFin = Range("J1:J" & Rows.Count).End(xlUp).Row
 
    Selection.TextToColumns Destination:=Range(LiFin), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="/", FieldInfo:=Array(1, 4), TrailingMinusNumbers:=True
 
 
End Sub