DL = .Range("A" & Rows.Count).End(xlUp).Row
.Range("A7:A" & DL) = .Range("B7:B" & DL).Value
.Range("A7:A" & DL).NumberFormat = "mmm-yy"
Bonjour,Bonjour chers tous
Je voudrais formater une plage au format date "mmm-yy"
Mais mon code marche pas. prière me corriger svp
VB:.Range("A7:A" & .Range("A" & Rows.Count).End(xlUp).Row).Value = Format(.Range("B7:B" & .Range("A" & Rows.Count).End(xlUp).Row).Value, "mmm-yy")
.Range("A7:A" & .Range("A" & Rows.Count).End(xlUp).Row).NumberFormat = "mmm-yy"