مشكلة في نقل التاريخ من sheet الى form

[احمد زعل]

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

 

أخواني لدي مشكلة وهي أني عند نقل التاريخ المخزن الموجود في sheet الى list فان اليوم و الشهر يتغيران(أي يصبح اليوم مكان الشهر و الشهر مكان اليوم)

فمثلا

أذا كان لدي التاريخ التالي في sheet في حقل A1 

02/03/2010

وأرد أن أضيفه داخل list من خلال الكود التالي

listbox1.additem range("a1").value

فأن عند نقله يصبح

3/2/2010

وجربت لحل هذه المشكلة تعريف متغير من DATE لكن دون جدوى

 

المثال في المرفقات

 

أرجوا من لديه الحل أن ينفعنا

و شكرا لكم جميعا

test.zip

[عبدالله باقشير]

السلام عليكم

جرب الكود التالي

Private Sub CommandButton1_Click()
ListBox1.AddItem Format(Range("a1").Value2, "dd/mm/yyyy")
End Sub

في امان الله

[احمد زعل]

مشكور أخي عبدالله

أنت رائع

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