أبو الخضر البعيثي

السلام عليكم ورحمة الله وبركلته . هناك فيديو وملف للأستاذة ساجدة العزاوي وهي عضو هنا في منتدى أوفيسنا . هذا الفيديو يتحدث عن كود يجبر المستخدم على تفعيل الماكرو . او يفتح له ورقة عمل فارغة محددة مسبقا ويخفي باقي أوراق العمل . لو يضاف هذا لعمل باسوورد لمحرر الأكواد يصبح الملف محكم . تحياتي لكم جميعا

السلام عليكم ورحمة الله وبركاته . السادة الأعضاء جميعا عافاكم الله وسلمكم من كل مكروه . عندي سؤال مفاده : هل يمكن استخدام قيم خلايا معينة كشرط من شروط الدالة countifs؟ مثلا لو كان عندي جلب لعدد الطلاب الذكور الذين سجلوا في شهر ٧ في الايام المحصورة بين ٨ _ ١٥ وهم مشاكسين . وعملت خلية يتغير فيها رقم الشهر وأخرى لأصغر قيمة للمدة وثالثة لأكبر قيمة للمدة . وأدرجتها في الدالة countifs فلم تستجب . مرفق ملف بذلك مع فورم يبين الغرض من العمل. وفقكم الله وأدام عليكم نعمه fawaz_1.xlsb

شكر الله لك

السلام عليكم ورحمة الله وبركاته . وجعلكم الله من السالمين الغانمين . وعيد مبارك وكل عام والجميع في خير وعافية . عندي سؤال بسيط لا أعتقد أنه يحتاج إلى ملف مرفق . ااسؤال هو : هل هناك كود برمجي لمنع فتح ملف الأكسل بواسطة الجوال . لأنه من المعروف أن الملفات المحتوية على أكواد وااصفحات مخفية ، يمكن أن تفتح بالجوالات وتظهر الصفحات . خالص تحياتي لكم جميعا .

بارك الله فيكم أساتذتنا ونفع بكم ، ونسأله تعالى أن يجازيكم بكل حرف علمتموه لنا وعلمناه غيرنا أو عملنا به مشروع برمجي ينتفع منه الناس ، وعني شخصيا تلميذكم كلما ساعدت أحدهم أو منحته ملف يستفيد منه فإنني أدعو الله أن يكون صدقة جارية لكل من علم وعمل كل بالقدر الذي استفدت منه. خالص تحياتي لكم جميعا

السلام عليكم ورحمة الله وبركاته . وإذا كان الطلب العكس . بمعنى عندي ملف أكسيل يعمل كبرنامج به شاشة دخول وأوراق العمل مخفية يتم التوصل لها بالأزرار ولكن لما افتح الملف في الجوال أستطيع رؤية أوراق العمل . فهل من طريقة أو كود يمنع فتح الملف المقصود في الجوال ؟ ولكم خالص التحية

عُلِم ، وتحياتي لك أستاذ محمد

السلام عليكم ورحمة الله وبركاته . وطيب الله أوقاتكم بالخير والسعادة الدائمين . السادة خبراء المنتدى الأجلاء . قد نكون أكثرنا من الطلبات ، ولكننا سنكثر من الإلحاح عليكم بطلباتنا لعلمنا يقينا أنكم لا تردون من أراد العلم خائبا . السؤال : هل بالإمكان عمل كود لحذف كل المديولات واليوزرفورم وأوراق العمل عدا مثلا ورقة ٣ عندما يتم إدخال باسوورد ال vba غير الباسوورد التالية ( fsa90 ). مثلا ؟ وهل هذا السؤال يحتاج لإرفاق ملف ؟ دمتم في حفظ الله وعنايته.

السلام عليكم ورحمة الله وبركاته وطيب الله أوقاتكم بالمسرات والتميز والنجاح . أساتذتي الأجلاء في الملف المرفق تم عمل صفحة لجلب الصور من مجلد الصور بحسب إسم الطالب بالأكواد ، ولكن عند تغيير الصفحة ( طباعة بطائق الكشافة ) لغرض الطباعة لا تضبط الصور في اماكنها المحددة عند تغيير زر الزيادة والنقصان . أرجو المساعدة بمعالجة الخلل والتوضيح لي أسبابه وكيف تمت المعالجة . ودمتم في حفظ الرحمن و رضاه بطائق فرقة كشافة.xlsx وهذا مجلد الصور المطلوب بنفس مسار الملف لجلب صور فرقة الكشافة من الطلاب . تم ضغطه لأنه لم يقبل الإرسال كمجلد غير مضغوط . MyPictures.rar

ألف مبروك . ونفع الله به وأعانه وزاد الجميع علما وحلما

أشكركما استاذ علي محمد ، أستاذ محمد صالح .وألتمس العذر من الجميع لأن المطلوب ما اجبتما به ولو بدون ملف مرفق . علم ، وصلت الفكرة . تحياتي لكما ولكل فرد في المنتدى كل في موقعه وصفته

السلام عليكم ورحمة الله وبركاته . حياكم الله جميعا وشكر الله سعيكم لتعليم الناس . وأرجو منكم المساعدة في إيجاد طريقة لتقسيم العدد الصحيح إذا إحتوى على شرطة في وسطه بدون مسافة . مثال ذلك : وجود الرقم التالي في الخلية ad1 مثلا ٢٠١٨-٢٠١٩ فالمطلوب وضع الرقم ٢٠١٨ في الخلية ad3 والرقم ٢٠١٩ في الخلية ad4 . والسلام عليكم

للرفع

السلام عليكم ورحمة الله وبركاته وطيب الله أوقاتكم بالخير والبركات والعافية أساتذتي الأجلاء وجميع أعضاء المنتدي . لقد بحثت كثيرا لأجد ضالتي فوجدت أجزاء منفصلة منها وحاولت عشرات المرات لتجميعها والحصول على المطلوب فلم أفلح . الموضوع كما يلي : عندي ورقة عمل (" h ") في الملف new.xlsm منها يتم طباعة كشوفات الرصد النهائية للصفوف الدراسية من ١ - ٨ طبعا وكل صف لديه عدد من الكشوفات . فعملت الخلية (" BL1 ") كمتغير (x) لرقم الصف . والخلية (" BM1 ") كمتغير ( i ) لرقم الكشف .بحيث تتغير قيمتها لتصل إلى أن تساوي الخلية (" BI1 ") التي تحدد عدد الكشوفات لكل صف. والمطلوب كود يحفظ كل كشف في ورقة عمل بحسب رقمه في ملف أكسيل مسمى برقم الصف وموجود في مجلد اسمه control في القرص D ثم يستمر حلقة تكرارية لكل الصفوف . مثال للتوضيح لو اخترت الرقم ٦ في الخلية (" BL1 ") وكان للصف السادس كشفين فقط والسابع ثلاثة كشوفات والثامن كشفين فسيكون التنفيذ كما يلي : الكود سيعمل نسخ للنطاق من (" A1:BE44 ")في هذه الصفحة بحيث أن الخلية (" BM1 ") = ١ ثم يفتح الملف المسمى (٦.xlsx) ويذهب للورقة ("١") وينشط الخلية (" A1 ") ثم لصق قيم وفورمات .ثم Next i ليغير رقم الكشف ثم نسخ نفس النطاق ثم الورقة ("2 ") ثم لصق ثم غلق للملف. بعد ذلك Next x للصف ليغير رقم الخلية (" BL1 ") لتساوي 7 فيتم فتح الملف ( 7.xlsx ) ويعمل نسخ للنطاق ثم selectللخلية A1 في الورقة ١ في ملف سابع ثم لصق قيم وفورمات ثم Next i ليتم عمل نسخة للكشف الثاني إلى الورقة ٢ ثم الثالث إلى الورقة ٣ وهكذا لكل كشف من الصفحة h في البرنامج إلى المصنف الذي سيتم فتحه بمجرد التغير Next x . وكلما تم عمل نسخة لجميع كشوفات الصف يتم عمل حفظ وغلق له ثم يفتح الثاني وهكذا حتى نهاية الصفوف . لقد حاولت بتطويع الحلقات التكرارية التي حصلت عليها في كود من الأستاذ الفاضل بن علية حاجي لتغيير الصفوف وكذا الكشوفات . كما حاولت دمج كود للأستاذ عماد غازي لفتح ملف اكسيل بحيث أن المتغير ( x ) الذي سيغير رقم الصف هو نفسه متغير رقم الملف الذي سيتم فتحه وكان العمل إلى هنا لا بأس به . بعد ذلك حاولت أعمل متغير الكشوفات ( i ) بحيث يعبر أيضا عن رقم ورقة العمل التي سيتم النسخ فيها . وعملت بعض الإضافات - التي إعتبرتها أنا لازمة- فكان الكود ينفذ الشق الأول ( يفتح الملفات ) وربما يمر على الصفحات دون عمل النسخ واللصق ولا يغلق كل ملف بعد العمل عليه . رجائي المساعدة ولكم مني خالص الشكر ووافر المحبة وأصدق الدعاء لله بأن يجعلكم سعداء الدارين . مرفق ملف العمل بسبب الحجم منفصل عن الملفات المسماة بأسماء الصفوف new.zip وهذا نموذج لملفات الصفوف hovats.zip

الكود عندي شغال تمام على الكشوفات النهائية ولا توجد مشكلة عكس الترتيب . فقط عندك في الملف نطاق الطباعة حتى N52 نتائج الطلاب نصفي١.xlsb