أبوعيد

سيتم حذف اوراق العمل وإغلاق الملف إذا تم فك الحماية تفضل حذف أوراق عمل1.rar راجع أيضا موضوعي هنا http://www.officena.net/ib/topic/63306-منع-المستخدم-من-فك-حماية-الشيت/?do=findComment&comment=411097

السلام عليكم هذا الكود يمكن ان أسميه فخ أو لغم من المعلوم أن هناك برامج لفك حماية الشيتات لا نستطيع مقاومتها أومنعها من كسر الحماية والمستخدم يقوم بكسر حماية الشيت للحصول على المعلومات السرية داخل البرنامج (معادلات ـ أعمدة مخفية .....الخ) إذا منعنا المستخدم من الحصول على هذه المعلومات السرية فنكون قد حققنا الهدف يبدأ عمل الكود من حدث الصفحة SELLECTION CHANGE ثم ينتقل إلى الإجراء booom وهو يقوم بحذف أوراق محددة عندما يتم فك حماية الورقة (الشيت) والنقر على أي خليه فيها ولكن انتبه : فيمكن أن يكون المبرمج نفسه هو ضحية لهذا الكود (كما حصل لي شخصيا أثناء العمل على هذا المرفق) إذا عاود المبرمج فك حماية الصفحة لتعديل أي معادلة مثلا وتحديد أي خلية سينفجر اللغم وتحذف الأوراق تلقائيا ويقفل البرنامج لذا بعد الانتهاء من عمل أي برنامج وبعد حماية الصفحات يتم وضع هذا الكود فإذا اراد المبرمج في وقت لاحق فك الحماية على الصفحة للتعديل عليها فيجب قبل ذلك الذهاب لمحرر الفيجوال والدخول على الماكرو booom وتعليق السطر الآتي ' Sheets(Array(1, 3, 4)).Delete لأنه المسؤول عن حذف الأوراق (الأولى والثالثة والرابعة) تفضلوا المرفق والشرح داخل الكود abo eed file.rar

جرب المرفق 11معدل.rar

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

وهذا المرفق ربما يحل أغلب المشاكل تحياتي ترحيل البيانات وتنسيق المرحل2.rar

السلام عليكم أخي الزريعي الحمدلله أنك توصلت للمطلوب وقد كنت أشتغل على ملفك من قبل ولكن بما أن الكود الذي وضعته طويل وينجز كثير من الأعمال فقط استغرقت وقت لفهمه ولإثراء الموضوع هذا حل لبعض المشكلات آثرت أن أعرضه هنا للاستفادة قمت بحذف كثير من أسطر الكود واستبدالها بما يناسبها قمت بعمل ترتيب للبيانات في الورقة h بما يناسب المطلوب تقبل تحياتي ترحيل البيانات وتنسيق المرحل1.rar

أرجو أن يكون هذا هو مطلوبك جدول ارسال.rar

السلام عليكم الحمد لله على السلامة شكرا لك أخ ياسر على المجهود المبذول تنبيه كان من المتوقع أن أرى أفضل إجابة في مكانها وهي آخر المشاركات في هذا الموضوع ولكن ظهرت في بداية الموضوع واختفت من هنا لذلك أرجو من الأخوة المشرفين إصلاح هذا الخطأ حيث أن المتابع لن يجد التسلسل في الردود تحياتي للجميع

تفضل تم التعديل على الملف book1 قم باستبدال الملف book1 بالملف المرفق ثم نفذ العملية جرب المرفق Book1.rar

وعليكم السلا م أخي حليم ناصر المرفقات لم تعد موجودة الرجاء أعادة تحميلها مرة أخرى لعلك تجد ردا من الأعضاء تحياتي

وعليكم السلام ربما لا زالت المشكلة قائمة بسبب تحديث الموقع وعدم وجود بعض المرفقات جرب هذا الموضوع http://www.officena.net/ib/topic/40157-طلب-كتب-برمجة-أكسل-vba/?do=findComment&comment=225150 أو هذا http://www.officena.net/ib/topic/60550-مطلوب-كتاب-انجليزى-سهل-وبسيط-اتعلم-منه-الفيجوال-البيسيك-للاكسيل/?do=findComment&comment=389349 أو هذا http://www.al-mostafa.info/data/arabic/depot/gap.php?file=VBA_lessons.pdf أو هذا http://www.thanwya.com/vb/showthread.php?t=526295

تفضل إضغط تنفيذ وجرب المرفق 1دمج.rar

وعليكم السلام تفضل http://www.officena.net/ib/topic/56941-افتح-الباب-وادخل-لعالم-البرمجة-متخافوش-يا-أحباب-من-اللي-ورا-الباب/?do=findComment&comment=361264 وهذا أيضا http://www.officena.net/ib/topic/32751-كتاب-عربي-لتعلم-مبادئ-vba/?do=findComment&comment=168833

الفائدة الأولى قانون إيجاد متوسط الزوايا sum of sines of angles A = arctan ------------------------ sum of cosines of angles مثال \المطلوب إيجاد متوسط الزاويتين 5 و 15 sin(5) + sin(15) 0.08716+0.25882 0.34597 ---------------- = --------------- = ------- = 0.17633 cos(5) + cos(15) 0.99619+0.96593 1.96212 A = arctan(0.17633) = 10 الفائدة الثانية المثلث المستوي هو مثلث مجموع زواياه تساوي 180 درجة وأضلاعه خطوط مستقيمة المثلث الكروي (أو الفلكي) هو مثلث مجموع زواياه أكبر من 180 درجة وأصغر من 540 درجة وأضلاعه أقواس من الدائرة

وعليكم السلام ورحمة الله وبركاته مرحبا أخي عبدالعزيز أسماء الزبائن وأرقام الأصناف تجدها في الأعمدة af ag aj وقد ورد خلل في تنفيذ الكود في المرفق السابق وهذا تصحيحه ترحيل البيانات2.rar

السلام عليكم تم الانتهاء من عمل اللازم لملفك أتمنى أن أنجح في التعامل مع الشكل الجديد للمنتدى وأتمكن من إرفاق الملف المعدل بعد الترحيل سيتم طباعة البيانات الموجودة في الفورم تفضل جرب المرفق ترحيل البيانات1.rar

صعوبة في إيجاد المرفقات صعوبة في البحث هل من الممكن إعادة المياه إلى مجاريها ؟

السلام عليكم بعد التغيير الكبير الذي طرأ على محتوى المنتدى حاولت البحث عن هذه المشاركة لأرد عليك وبعد فترة وجدتها أخي شكيب ما عملته هو : تحسين أداء الأكواد التي كانت موجودة في الملف تقييد إدخال المستخدم لخانة التاريخ حتى لا يدخل تاريخا بالخطأ وذلك عن طريق تبويب (التحقق من صحة البيانات) عند حذف الموظف يتم حفظ بياناته في السطر 20 من الورقة1 حتى يتم آظهار هذه البيانات عند الضغط على زر الحذف مرة أخرى فتحصل على بيانات آخر موظف تم حذفه

السلام عليكم جرب المرفق كود ترحيل 1.rar

السلام عليكم تقبل الله طاعتكم وكل عام وأنتم بخير

تم التعديل على الملف بعد فك الضغط على المرفق قم بوضعه داخل المجلد الذي يحتوي على ملفاتك ثم اتبع الخطوات كما في الشرح داخل الملف تحياتي أبوعيد.rar

السلام عليكم جرب المرفق Key.rar

وعليكم السلام المعادلات موجودة في العمود k تفضل R&L#1.rar

تم تطوير الكود لاحظ الخلية AC36 و AD33 تحياتي قمة وقاع5.rar

عسى ان يكون المطلوب بيانات مستاجر2.rar