اذهب الي المحتوي
أوفيسنا

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


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

والله الموفق

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information