Sheets("List").Cells(EndRow + 1, 2).Value = Sheets("البرج(1)").Cells(5, 50).Value
السلام عليكم ورحمة الله و بركاته
أخي الكريم أنت بحاجة لتحديد مسار الملف الهدف على جهازك و تضعه في هذا المكان
("البرج(1)").
و أتمنى أن تجد الحل بذلك
الأخوة الكرام السلام عليكم ورحمة الله و بركاته
بالفعل أنني استفدت بدرجة كبيرة من وجودي في هذه المنتديات الرائعة وأنني لا أبخل على أي عضو بأي معلومة أعرفها و راجع المشاركات تعرف ذلك
و ها هو الملف مفكوك الحماية ليستفيد منه الجميع وأنا جاهز لأي استفسار
الملف هنا
cer.zip
السلام عليكم و رحمة الله و بركاته تعقيبا على كلام الأخ hussam031 يمكنك إضافة عمود جديد تدرج فيه الدالة Round إذا أردت أن يجري عملية التقريب للأعلى و الأدني و استخدام roundup إذا أردت التقريب للأعلى فقط ومن ثم تجري عمليهة التفيط للأرقام بعد التقريب
حدد العمود ثم من تنسيق اختار خلايا ثم الحماية ثم أشرعلى مؤمنة ثم اذهب إلى أدوات ثم حماية اختر حماية ورقة ارفع إشارة الصح عن الخيار الأول و هو تحديد الخلايا المؤمنة و اكتب كلمة المرور التي تريد و هكذا تمت حماية العمود
بالتوفيق