Ignorer une partie du code

Bonjour,

Le code transforme la colonne C qui est au format 23.03.16 en 23/03/2016.

Par contre je souhaiterai qui si la transformation est déjà faite, la macro ne relance pas la partie qui fait cette transformation.

En commentaire j' ai mis quelque chose pour donner l' idée mais cela ne fonctionne pas.

Merci bcp pour votre aide

Bonjour Fred,

Vous pouvez ajouter à votre code un test de type

If Range("C" & w).NumberFormat = "dd/mm/yy" Then
   Passer à l'enregistrement suivant
Else
   Effectuer votre traitement
End If

Bien à vous

Jp

Bonjour,

Sub SommeCommande()
    Dim n%, i%
    With Worksheets("Feuil2")
        n = .Cells(.Rows.Count, 3).End(xlUp).Row
        For i = 2 To n
            .Cells(i, 3) = CDate(Replace(.Cells(i, 3), ".", "/"))
        Next i
        .Range("C2:C" & n).Columns.AutoFit
    End With
End Sub

Cordialement.

Bonjour à tous,

Une alternative.

Cdlt.

Sub Convert_Date()
Dim rng As Range

    Application.ScreenUpdating = False
    Set rng = ActiveSheet.Cells(1).CurrentRegion.Offset(, 2).Resize(, 1)
    With rng
        .TextToColumns DataType:=xlDelimited, FieldInfo:=Array(1, 4)
        .EntireColumn.AutoFit
    End With
    Set rng = Nothing

End Sub

Merci à tous pour votre aide

Merci d'indiquer votre post comme résolu si vous avez votre réponse.

Bien à vous

Jp