فصل الأسم عن التاريخ

[Akram Galal]

السلام عليكم ورحمة الله وبركاتة

اريد فصل الأسم عن التاريخ الموجود في الخلية A1

بيحث يكون التاريخ في الخلية B1

والأسم في الخلية C1

جزام الله خيرا

تجزئة الأسم.xlsx

لا داعى لضغط الملفات ذات المساحات الصغيره

 

[lionheart]

In cell B2 use this formula

=DATEVALUE(LEFT(A2,FIND("-",A2)-1))

In cell C2 use this formula

=TRIM(RIGHT(A2,LEN(A2)-FIND("-",A2)))

 

[بلانك]

DATEVALUE غير موجوده في اوفيس2010 فما العمل؟؟؟؟؟؟؟؟؟؟؟؟؟؟ lionheart

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

B2=LEFT(A2,FIND("-",A2)-1)

 

[بلانك]

بارك الله فيك محي الدين ابو البشر

[محمد حسن المحمد]

14 ساعات مضت, بلانك said:

DATEVALUE غير موجوده في اوفيس2010 فما العمل؟.

بعد إذن من سبقني يمكنك ضرب ناتج المعادلة بالرقم 1 ثم تنسق الخلية بالتاريخ:

=LEFT(A2;FIND("-";A2)-1)*1

[Akram Galal]

جزاكم الله خيرا

أستاذ lionheart

هل ممكن ان يتم عن طريق كود VBA 

فمثلا اذا كان الأسم والتاريخ في Textbox1

يمتم فصل التاريخ في Textbox2 والأسم في Textbox3

تم تعديل مارس 21, 2023 بواسطه Akram Galal

[lionheart]

Try this

Private Sub TextBox1_Change()
    Dim v() As String
    v = Split(TextBox1.Value, "-")
    TextBox2.Value = Format(CDate(v(0)), "dd/mm/yyyy")
    TextBox3.Value = v(1)
End Sub