Re : Calcul VBA
désolé, voila le code
Sub NumDemande()
Set c = [G2]
Do While c <> ""
If Cells(c.Row, 1) = "" Then Exit Sub
c = "CAS-" & c.Offset(0, -5) & "-" & c.Offset(0, -3) & "-" & c.Offset(0, -4) & "-" & Format(c.Offset(0, -6),"yyyymmdd")
Set c = c.Offset(1, 0)
Loop
End Sub