وائل احمد المصري

اختي لم افهم سؤالك هل له علاقة بطلب اخي ان انك تسألين عن موضوع الترحيل بصفة مستقلة؟

الاروع مرورك وتعليقك يا مستر ياسر :)

اخي الهادي بداية التعلم ان تجرب بيدك فحاول ان تطبق نصيحة اخي شوقي وتحاول وان عجزت تبدأ مرحلة المساعدة مجرد نصيحة :) لفتة بسيطة : ضع الحماية بالطريقة العادية للصفحات ثم في ديول ضع الكودين التاليين : Function Protectit() ActiveSheet.Protect Password:=pass, DrawingObjects:=True, Contents:=True, Scenarios:=True End Function Function Unprotectit() ActiveSheet.Unprotect Password:=pass End Function وقم باستدعاء كود فك الحماية فيبداية اوامر زر الترحيل وكود الحماية في نهاية اوامر زر الترحيل :)

الاخوة الاعزاء طبتم بناء عن طلب احد الأخوة قمت بفضل الله بعمل ملف يقوم بتشفير البيانات وثحويلها لباركود ثم العملية العكسية لفك التشفير فيما يمكن استخدامه ؟ 1-تشفير كلمات المرور 2-تشفير البيانات بالكامل داخل ملفات الاكسيل والعديد من الافكار ادعوا الله ان يكون مفيدا" باركود مع التشفير واعادة فك التشفير.rar

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

عمل متميز بارك الله فيكما

معلومة جميلة ربنا يبارك فيك :)

بعد اذن اخويا ياسر استبدل Sheets("close").Range("l20")= TextBox94.Value ب Sheets("close").Range("l20").Value = TextBox94.Value وشوف ح تظبط معاك

اللهم اجعله في ميزان حساناتهم ما شاء الله عمل اكثر من رائع ابداع

http://www.officena.net/ib/index.php?showtopic=55039 انظر هنا اخي عسى تلبي طلبك

ربنا يبارك فيك دة شيء بسيط امام ما تعلمناه من عمالقة المنتدى جزاهم الله خيرا"

الاخوة الأفاضل ( أداريين وأعضاء) طيب الله اوقاتكم أنا اعشق البساطة واختيار اقل الطرق تعقيدا" لذا قمت بفضل الله بتصميم هذا الفورم البسيط لاحضار صورة من اي مسار وعرضها ثم حفظها في مسار محدد وهو "image" في نفس مسار الملف كما يمكن تطويعة حسب الحاجة على سبيل المثال صور الموظفين - صور الاصناف ....... الخ ارجو ان ينال استحسانكم وان تجدوا فية فائدة أن شاء الله طبتم getimg.rar

نحن واياكم اللهم امين

أشكرك اخي

نفس النتيجة اللون رمادي طب ما تخليها ليبل وتريح نفسك لازم تكست بوكس لان عليها عمليات حسابية كثيرة وشكرا على فكرة انتة بردو ممكن تعمل العمليات الحسابية على الليبول كابشن عادي

اخي الحبيب يوجد العديد من الاخطاء في اسماء النطاقات كما ارفقت في الصورة فهل للملف ملفات اخرى مرتبط بها ام انك غيرت اي شيء في الملف الاصلي

اخي دائما" تنعتني بألقاب انا اصغر من ان القب بها لك كل الود والاحترام :)

الباس ورد اية اخي الخاصة بحماية الصفحات

طب ما تخليها ليبل وتريح نفسك أنا أحب من الآخر بلاش لف ودوران “I choose a lazy person to do a hard job. Because a lazy person will find an easy way to do it.” ― Bill Gates :D

أخي كما اسلفت لك أنفا" مشكلة اي ملف اكسيل تكمن في المقام الاول في التنسيقات والتسيقات لا حاجة لها الا اذا كانت الصفحة نشطة في نمط العرض لذا يمكن تسجيل هذا التنسيق بواسطة ماكرو ثم يتم استدعاء هذا الماكرو عند تنشيط هذة الصفحة في الحدث Private Sub Worksheet_Activate() مع عمل ماكرو عكسي يتم تفجيرة في حدث Private Sub Worksheet_Deactivate() وبذلك تتغلب على مشكلة التنسيقات وبنفس المنطق يمكنك عمل المعادلات ارجوا ان اكون قد افدتك

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

طب ما تخليها ليبل وتريح نفسك

استخدم الخاصية locked بدل enbled في التيكست بوكس

لعل المانع خيرا" هل وفى المرفق الغرض ان كان رجاء الرد حتى نغلق هذا الامر شكرا"