Ali994m

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

السلام عليكم الطلوب جعل ال Textboxلا يقبل أي قيمة ليست رقم وجزاكم الله كل خير textbox.xlsm

اجابة رائعة جزاكم الله كل خير

كود رائع جزاك الله كل خير أخي هذا الكود رائع لكن لتنسيق معين التنسيق المطلوب "S21-"00# فهل توجد طريقة لهدا التنسيق .. أو طريقة لعامة لاظهار النص بدلا من القيمة .. وجزاك الله كل خير

السلام عليكم أرجو المساعدة تعديل الكود الذي يعمل على اظهار قيمة اخر خلية في العمود المطلوب أن يظهر نص الخلية أي يظهرها مع ال format الخاص بها Private Sub CommandButton1_Click() Dim LR As Long LR = Cells(Rows.Count, 1).End(xlUp) msgbox LR End Sub وجزاكم الله كل خير Book1.xlsm

كود رائع جزاك الله كل خير لكن الكود لايعمل الى مع الخلايا التي معرفها نص ولا يعمل مع الأرقام والتاريخ

الملف ppp.xlsm

جزاك الله كل خير لكن الكود لم يعمل أخي ظهرت رسالة خطا كما في الصورة وحتى بعد حذف جزء الكود الخاص بالصفحة الثانية وترك الجزء الخاص بالترحيل على الصفحة الأولى MICRO لم يعمل الكود

الهدف الكلي من الموضوع أني أقوم باضافة بيانات على عالشيت raw و micro على مدار اليوم بشكل متكرر من خلال فورم اخر في اخر اليوم أريد اضافة بيانات أخرى على نفس الصفوف من خلال هذا الفورم وذلك من خلال اختيار تاريخ اليوم وجزاك الله كل خير

يتم الترحيل الى جميع الصفوف في الشيت raw و micro التي تساوي قيمة العمود Date قيمة ال Textbox

المطلوب أن يتم الترحيل على الى الصفوف في الشيت RAW & Micro اذا كانت خلية F الصف في احدى أو كلتا الشيتات تساوي قيمة ال TEXTBOX دون الترحيل الى اخر صف وجزاكم الله كل خير

السلام عليكم أرجو المساعدة في تعديل كود الترحيل ليتم الترحيل الى الصفوف التي تساوي خلية العمود F مع ال Date TEXTBox وجزاكم الله كل خير ppp.xlsm

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

جزاك الله كل خير تم تعديل الكود وتم الأمر