حسام نور

تفضل أخي الكريم http://www.officena.net/ib/index.php?showtopic=8693 وفقكم الله

موضوعاتك مشوقه كما عودتنا ..... بورك في جهودك

كلمة السر ( Officena ) ولقد ذكرتها في نفس الموضوع ولكن يبدوا أنك لم ترى ذلك في المشاركات وفقك الله

الأستاذ علي السحيب ........ أعمال إبداعيه وضعت بها الأكسيل خارج حدود المستحيل بورك في جهودك

عمل متميز بالفعل جزاك الله كل الخير ونفع بعلمك وعملك الجميع

كل عام وأنتم بخير راجع الرابط التالي وستجد ما تبحث عنه بإذن الله http://www.officena.net/ib/index.php?showtopic=3331

عمل أكثر من رائع

جرب المرفق ________________.zip

وإن لم تنجح ... أرفق لي الملف المراد حذف شريط أدواته وسوف أساعدك

- في الملف المرفق تلاحظ أن الشريط أختفى .. مما يؤكد أنك لم تقم بالخطوات بالشكل الصحيح

- بسيطه - في خليه جديده أكتب فيها معادله تفيد بأنها تساوي مجموع الأرباح × 20% أنظر المرفق _______.zip

* إفتح الملف الذي لديك والذي تريد تطبيق الفكره عليه * إضغط Alt + F11 * في يسار الشاشه قم بالضغط مرتين على This WorkBook * في يمين الشاشه ضع الكود التالي Private Sub Workbook_Open() Call HideCommandBars End Sub وثم ضع تحته أيضاً الكود التالي Private Sub Workbook_BeforeClose(Cancel As Boolean) Call UnhideCommandBars End Sub * في المرفقات ستجد Module في ملف مضغوط . قم بفك الضغط عنه وأحفظه بأي مكان لديك بالجهاز * الآن من يسار شاشة الفيجول بيسك أضغط برز الماوس الأيمن وأختر Import File * الآن أختر الموديول الذي حفظناه على جهازك منذ قليل لإدراجه في الملف * أغلق كل شيء وأحفظ التغييرات * شغل الملف وجرب أي مشاكل تقابلك أرفق لي الملف الذي لديك وسأقوم بعمل اللازم تحياتي Module1.zip

تفضل أخي في المرفقات CommandBars.zip

متألق ومبدع كعادتك أخي علي ... وفقك الله

وضح أخي أين تظهر لك هذه الرساله ؟ وهل قمت بتغيير أسم البرنامج حيث لو تم تغيير أسمه ستظهر رسالة خطأ كلمة السر للمسح " بسم الله "

* أليكم الإصدار الثاني من برنامج القروض والذي تمت بعض الإضافات عليه كإضافات للأصدار الأول الذي تم طرحه هنـــــــــا * في الإصدار الثاني يمكنك الإطلاع على تقرير منفصل خاص بكل مقترض * كما يمكنك مسح بيانات مقترض بشكل كامل حيث يتوجب عليك التوجه لصفحة القروض والضغط على زر Delete وإدخال رقم المقترض . ومن ثم الذهاب لصفحة التسديد وتكرار نفسالخطوه وكذلك بصفحة الأسماء * إذا تم التوصل لخطوه أسهمل من ذلك سنوافيكم بها شكراً لكم ____________________________.zip

الكود التالي يجبر الأكسيل أن يفتح على ورقة عمل معينه . Private Sub Workbook_Open() Sheets("Main").Activate End Sub * أفتح ملف الأكسي المراد تطبيق العمل عليه * أضغط Alt+F11 * من أعلى الصفحه يساراً This Workbook أغضط عليها ضغطتين * على اليمين ضع الكود السابق * السطر الثاني بالكود يحوي أسم ورقة العمل المراد الفتح عليها دائماً ويجب عليك تغيير الأسم حسب أسم ورقة العمل لديك * أحفظ المتغيرات وأغلق الملف وأعد تشغيله وجرب بالتوفيق

مرفق نسخه غير محميه تحياتي ______________.rar

سأرفق لكم نسخه غير محميه

مرفق البرنامج بالتاريخ الهجري بالتوفيق _______________________.zip

خالص شكري وتقديري لكم ....

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

هل يفي هذا بالغرض ... راجع المرفقات Time_Accounting.zip

- يوجد بهذا القسم العديد من الموضوعات لهذا الخصوص http://www.officena.net/ib/index.php?showforum=9 يرجى مراجعة القسم وإفادتنا في حال عدم الوصول للمطلوب

* الرابط التالي سيفيدك خطوه بخطوه http://www.officena.net/ib/index.php?showtopic=3069