(تمت الاجابة) تعديل التكست بوكس داخل فورم

[oyousef]

اساتذة المنتدى الافاضل

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

وبعد

لقد قمت بتصميم فورم داخل هذا المرفق وبها 2 من التكست بوكس ادخل بهما التاريخ على هذا المنوال

(dd/mm/yyyy) على ان يتم بعد ذلك طبعهما فى الخليتان i2 ,l2 ولكن اصادف مشكله عجزت عن حلها وهى عند نقل محتوى التكست بوكس الى الخليتين المذكورتين يقلب التاريخ ليكون بهذا الشكل

(mm/dd/yyyy)

فهل من حل لهذه المشكله

واخيرا تقبلوا وافر تحياتى

expenses.rar

[عبدالله المجرب]

اخي الفاضل

استبدل الكود السابق

بهذا

Private Sub CommandButton1_Click()

Range("g2").Value = TextBox1.Value

Range("i2").Value = Application.WorksheetFunction.Text(TextBox2.Value, "dd/mm/yyyy")

Range("l2").Value = Application.WorksheetFunction.Text(TextBox3.Value, "dd/mm/yyyy")

UserForm1.Hide

End Sub

والله الموفق

[oyousef]

الاخ الفاضل الاستاذ العبقرى ابو احمد

ما من كلمات شكر توفيك حقك

على كل حال سلمت يديك وسلم عقلك

ودائما للامام ودائما نتعلم منك :fff: