goodfas

 

أخي الكريم // مازن 

جزاك الله خيرا 

لكن الملف لا يعمل يظهر الخطا التالي عند التشغيل

 

 

ويوجد خطأ هنا

Private Sub UserForm_Initialize()
'For i = 4 To 20
'If Sheets("security").Cells(i, 1) <> "" Then ComboBox1.AddItem Sheets("security").Cells(i, 1)
'Next i
End Sub

مازن زهران الله يعطيك العافية تأكد من البرنامج.

بعد إذن أخي / عبدالله المجرب

إذا كنت تستخدم  أكسل أوفيس 2007

قم بتغيير نوع الحفظ في خانة/

                        حفظ كنوع من : Excel Workbook   وهذا يحفظ الملف بدون مكرو

                                    إلى : Excel Macro-Enabled Workbook  هذا حفظ بالمكرو

وأن شاء الله سيتم حفظ الملف بالمكرو.

تسلم أخي/ محمود

والله يعطيك العافية تم تنزيل المرفقات.

أخي/ محمود

مشاركة رقم/47 / الترتيب العشوائى بالمعادلات
مشاركة رقم/87 / CALENDER 
مشاركة رقم/120 / علم بلادى بالتنسيق الشرطى
مشاركة رقم/132 / أشكال بالتنسيق الشرطى
مشاركة رقم/142 / أجمل إبتسامة للمعادلة
 

أخي / محمود

المشاركة رقم / 47 - 87 - 120 - 132 - 142

أخي / محمود

لم استطيع تنزيل بعض الملفات الأخيرة المرفقة

لا ادري ما سبب.

ولك من جزيل الشكر والتقدير,,,

تسلم أخي /حمادة

والله يعطيك العافية هذا يدل على حرصك واهتمامك.

بس بعد التعديل على النموذج والكود اتضح التالي :

1- عند عمل تسجيل بيانات جديدة يقوم الكود بوضع البيانات في أول خلية خارج الجدول ويمسح الجدول

   أنضر أخي للملف المرفق.

2- يا حبذا ربط (تكست بكس2 (Cod)) بالكمبكس بدل (تكست بكس1) أو إلغاءه هذا بالنسبة لطلبي

عندي بعض لاقتراحات بالنسبة للأزرار,

يا حبذا أن تكون على الشكل التالي : زر

(جديد  -  إضافة  -  تعديل  -  حذف أو مسح (مع ترتيب الجدول بعد المسح أو الحذف)  -  إغلاق )

ولك مني جزيل الشكر والعرفان,,,

شاشة ادخال واستعلام وتعديل 4تعديل تعديل جديد.rar

أخي / حمادة  عمر

أنا ما ادري ماذا اقول لك

ولكن لا اقول إلا جزاك الله ألف خير على حل المشكلة 

حل ممتاز جداً وسهل الله يعطيك العافية.

هذا مجرد إقتراح مني:

اتمنى لو قدرنا مستقبلاً أن يكون الكود يبحث بنفسة في

الصفحة كاملة عن النتيجة إذا كانت (TRUE) ويقوم

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

تزيد الفواتير او تنقص مستقبلاً,

مثل حل أخينا /أحمد زمان الله يجزه خير

ولك شكري وتقديري,,,

وين الشباب ؟

أخ / حمادة عمر

جزاك الله ألف خير على المجهود العظيم

شرحك كان واضح جداً جداً

بس حاولت تطبيق النوذج والكود ولكن لم استطع فعل ذلك

كيف أبدا فرضاً من العمود الثالث أو الرابع وكذلك الصف

العاشر او السابع عشر في إدخال المعلومات اوالاستعلام او تعديل البيانات

ممكن تساعدين في الملف المرفق!

ولك مني جزيل الشكر والعرفان. 

اكسيل ..طريقة عمل شاشة ادخال واستعلام وتعديل 4.rar

_{ممتاز الله يعطيك العافية}

يا هلا ومرحبا بالأخ / الشهابي

هذا الملف أو البرنامج يخص العمل

والملف المرفق مجرد نسخه من الملف

الأصلي للعمل وأنت تعرف هذه أسرار العمل,

عن استفسارك بخصوص صفحة (Data) هي صفحة بحث

أو جلب البيانات قد تكون سطر واحد أو خمسين سطر وتصل

إلى أكثر من ذلك حسب نتائج البحث,

لو تلاحظ صفحة (Invoice) مربوطة بصفحة البيانات لماذا ؟

بسبب لو طلبت طباعة عادية راح تطبع لك جميع الفواتير الموجودة

في الصفحة سواء كانت مليئة أو فاضية,   

من أجل ذلك طلبت المشاركة في التعديل على الكود!

ولكم مني جزيل الشكر,,,

بسم الله الرحمن الرحيم

أخواني/السلام عليكم

سبق وأن طلبه في هذا المنتدى العريق هذا الطلب على الرابط:

http://www.officena.net/ib/index.php?showtopic=41197

طباعة الفاتورة بشرط وجود معلومات في الخلايا؟

وقام الأخ / أحمد زمان

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

جداً جداً وهو معمول على أوفيس 2003

وعند نقل الكود إلى أوفيس 2007 حصلت المشكلة أنه

لا يعمل ويفيد بوجود خطأ, والمطلوب هو:  

أُريد من الكود أن يبحث داخل الفاتورة ما بين

الخلية B8 إلى الخلية I28 إذا يوجد أي معلومة في

أي خلية يطبع الفاتورة كاملة كذلك في جميع الفواتير في الأسفل.

يوجد خمس فواتير في الصفحة ويمكن أن تزيد إلى 100فاتورة مستقبلاً.

إذا أمكن تعديل الكود أو يستبدل بكود آخر,

زر الطباعة في بداية الصفحة Main

الملف مرفق أكسل 2007

يا أخوان الموضوع ضروري تكفون!

ولكم مني جزيل الشكر,,,

طلب طباعة بشرط3.rar

عمل ممتاز الله يعطيك العافية

للرفع,,,,!

يا شباب وينكم

هل الحل صعب!

عسى المانع خير؟

يا أخوان أنتو حليتو أصعب من هذا الطلب!

ممتاز الله يعطيك العافية,,,,,

للرفع,,,,!

للرفع,,,,,,,,؟

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

أريد التالي :

1- كيف ألغي زر إغلاق وزر تصغير.

2- كيف أجعل زر خروج عند الضغط عليه يقوم بحفظ نسخة على سطح المكتب

   وهي الأساس ونسخة في مسار D:\ بشرط يحفظ على نفس الملف المحفوظ

   في كل مرة عند الخروج من البرنامج في \:D

  الشرح في الملف المرفق

ولكم جزيل الشكر والتقدير,,,

Tabel.rar

مشكور أبو حنين والله يعطيك العافية

اسف على الرد المتأخر كنت مشغول

ألف ألف شكر لك,

بس أبو حنين هل استطيع أن أستخدم الكود

الموجود في اليوز فورم على ملف ثاني

ولك كل شكر وتقدير,,,

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

عندي مشكلة في UserForm وجدته في أحد المشاركات

وحبيت أن أطبقه على الملف المرفق ولكن دون جدوى الكود صعب

يا حبذا من يقدر يعدل عليه ويجعل الكود يكون سهل حتى

يمكن إستخدامه على ملفات آخرى مستقبلاً,

ولكم جزيل الشكر والتقدير,,,,

Control.rar

مشكور والله يعطيك العافية

استاذى الغالى/ عبدالله باقشير

تسلم إيدك ودائما سباق لعمل الخير

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

هذا هو المطلوب تسلم,,,

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

مشكلة في الكود عند تنفيذه يطول ولا يجمع الأنواع المتساوية من العمود A بسم واحد من كل نوع ويضعها في العمود B ومجمع كل

نوع في العمود C كعدد.

شرح الطلب أكثر في الملف المرفق

ولكم جزيل الشكر والتقدير,,,,

CAR Control.rar