العفو اخي : / حمادة عمر
جزاكم الله خيرا على المرور
و دائما استعمل الاكواد الغير احترافية ليسهل فهمها و أسمي الاشياء بمسمياتها الحقيقية حرصا على تبسيط الكود
السلام عليك احبتي :
ارجو المعذرة لعدم ردي في الوقت المناسب لظروف خاصة
اخي الحبيب ابو نصار :
دعاء جميل لكن شرط ان بيقى سرا بيني و بينك ، فلو قرأت زوجتي ردك لأرتني النجوم في غز الظهر
جزاك الله خيرا و رزقك حورية من حور الجنة في الدار الاخرى و ليس في الدنيا
اخي الحبيب حمادة
جزاك الله خيرا على مروركم الطيب
ادام الله عليك الصحة و الهناء
السلام عليكم
هل تريد كتابة الاسم فقط في صفحتي البدلات و الاستقطاعات عند كتابته في صفحة البيانات او تريد كتابة بيانات اخرى ايضا ؟
اذا كان الامر هكذا انظر المرفق
ربط صفحات1.rar
السلام عليكم
جزاك الله خيرا اخي حمادة عمر على مروركم و سبب تواجدي القليل هو اصابتي بكسر في اليد
اخي rbyeb
لقد مسحت المعادلات التي تقوم بالترقيم و غيرتها بكود موجود في الصفحة الاولى
FF.rar
السلام عليكم
تقوم اخي بنسخ هذا الكود في الفورم
Private Sub UserForm_Initialize()
LR = Feuil1.Cells(Rows.Count, 2).End(xlUp).Row
TextBox1 = Feuil1.Cells(LR, 2).Offset(0, -1)
End Sub