استبدال علامة التاريخ

[وليد المصرى 1]

السلام عليكم اخوانى الاعزاء

اريد كود يعمل على استبدال علامة التاريخ من / الى -

بمعنى لو التاريخ 28/02/2023 يتحول الى 28-02-2023

اريد كود وليس معادلة 

شكرا 

استبدال.xlsx

[محي الدين ابو البشر]

عليكم السلام

لا داعي لكود

يمكن عمل ذلك من

 Custom <<  Format cells << وهناك يمكنك الاستبدال

[وليد المصرى 1]

شكر لحضرتك 

[lionheart]

You can simply use Replace Function

Debug.Print Replace(cell.Value,"/","-")

 

[وليد المصرى 1]

شكر اخى lionheart 

[وليد المصرى 1]

ممكن بس الطريقة ازاى اشغل الكود 

[lionheart]

I suppose you are looping through cells in a range so in VBE insert new module then type the code like that

Sub Test()
    Dim cel As Range
    For Each cel In Range("D1:D10").Cells
        cel.Value = Replace(cel.Value, "/", "-")
    Next cel
End Sub

 

[وليد المصرى 1]

 😀Thank u for your support and interest