سالم شباني

السلام عليكم

كتاب قيم ، جازى الله مؤلفه خير الجزاء

الشكر موصول للأخوين أبو محمد و kemas

السلام عليكم

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

لمتابعة هذه الأفكار النيرة التي استفزت بعضا من خلايا مخي النائمة

وبعد عدة محاولات وبالإعتماد على ما ادخرنا من أكواد قمت بهذه الخربشة البسيطة

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

لكم مني كل المودة والتقدير

من هنا وهناك.rar

السلام عليكم

الأستاذ عماد ، حياك الله وأدام عليك نعمه

فورم ممتاز ، وفقك الله وجعله في ميزان حسناتك

لقد تطفلت على الملف وجعلت الفورم يظهر عند فتح الملف

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

hosami12.rar

السلام عليكم

الأخ مصطفى كمال بارك الله فيك على العمل الممتاز

لك مني كل تقدير

السلام عليكم

أخي الحبيب بن علية جزاك الله خيرا على هذا العطاء المتميز

وكما عهدناك أستاذ رحب الصدر لا يكل ولا يمل

جعله الله في ميزان حسناتك وأدام نعمه عليك

وفيما يخص العشر الأوائل فلدي هذان الملفان وهما من ثمار المنتدى

قدمهما الأستاذ الفاضل أبو هادي الذي أدعو له بدوام العافية

ترتيب.rar

العشرة الأوائل.rar

السلام عليكم

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

كما أشكرك على طريقة التقديم الرائعة

السلام عليكم

الأزرار نوعان نحصل عليهما من :

1- النماذج وهذا النوع لا يمكن تغيير اللون بل يمكن تغيير لون الكتابة

2- مربع الأدوات وهذا النوع يمكن تغير لون الزر بالضغط على يمين كليك ثم نختار الخصائص

3- يمكن إنشاء زر بأدوات الرسم كشكل هندسي أو مربع نص حيث يمكن تلوين خلفياتها ( والله أعلم )

لون الزر.rar

السلام عليكم

أخبر أحبائي وإخواني في الله أن البراء بن ياسر خليل مريض هذه الأيام

أرجو منكم جميعا أن ترفعوا أيديكم متضرعين للمولى عز وجل أن يشفي ولدنا البراء

وأن يذهب عنه السقم ويرزقه الصحة والعافية وأن يجعله قرة عين لوالديه وذخرا للإسلام

اللهم اشفيه شفاء لا يغادر سقما يارب

السلام عليكم

تحية خاصة إلى أخي الغالي والأستاذ الفاضل بن علية

أعمالك في غاية الدقة والتميز فجزاك الله خيرا

أخي مصطفى كمال الملف الذي قدمته تنقصه بيانات الورقة المسماة (clas)- كما أعتقد -

السلام عليكم

الأستاذ الفاضل هشام ، الأستاذ المحترم أبو عبد الله

بكل صدق نحن نستأنس بإبداعاتكم ، وفقكم الله وأعانكم على نوائب الدهر

السلام عليكم

أخي سليمان ، حياك الله

لقد حملت البرنامج الأول فكان مميزا وفي غاية الإبداع

لكن يا ريت لو ترفع الملفات باستخدام خاصية المرفقات

لك مودتي وتقديري

السلام عليكم

مشكور كثيرا أستاذ عماد على التميز والدقة في الإنجاز

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

السلام عليكم

بورك فيك أخي ياسر ، برنامج ممتاز سأستفيد منه كثيرا

زادك الله علما ورزقك العافية

السلام عليكم

مميز كعادتك أخي ياسر جزاك الله خيرا

بعد إذنك جعلت الكود يشتغل عند فتح الملف

كما خربشت قليلا فيه وجعلت الرسالة عربية بدلا من الإنجليزي

SortSheets.rar

السلام عليكم

طالما راودني هذا الأمر منذ مدة طويلة وقد طرحته من زمان

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

السلام عليكم

الأخوين الكريمين ( الجزيرة / أبو عبد الله ) جزاكما الله خيرا على الإيقونات الجميلة

ولأخي ياسر أقول الإيقونات توضع باستخدام خاصية إدراج صورة

icons.rar

السلام عليكم

كود ممتاز وفكرة إنجازه أكثر تميزا

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

السلام عليكم

أستاذ عماد الحسامي ، من صميم القلب أهنئك على الترقية التي تستحقها عن جدارة

رزقك الله الصحة والعافية ووفقك إلى كل خير

السلام عليكم

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

أخي زياد ، زادك الله رفعة ، أهنئك من القلب على الترقية فأنت أهل لها ، أرجو لك النجاح والمزيد من العطاء

في الأخير أشكر أعضاء إدارة المنتدى على حسن تقديرهم للأعضاء المميزين متمنيا لهم المزيد من التألق

أخوكم الذي لا ينساكم أبدا ( سالم شباني )

السلام عليكم

أستاذ هشام حياك الله

حقيقة مساهماتك في القمة فلا تكفي جملة واحدة لشكرك

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

لو تكرمت بشرح ما ورد في ملف دالة if لأكثر من 25 ( شرح الكود )

ثم أسألك عن مصدر الأسماء التي تظهر في الخلية b2

بارك الله فيك

السلام عليكم

اللهم ارزق والد أخينا زياد العافية واشفه من مرضه يارب العالمين

السلام عليكم

أخي ياسر مشتاقون إلى مساهماتك المميزة

والملف الذي وضعته من تلك ، لكني عند الضغط على الماكرو

جاءت رسالة خطأ تشير إلى السطر التالي

Controls("&File").Copy OldMenu.

علما أن الأوفيس عندي 2007 بالعربي

ممكن توضيع العبارة Add-Ins

تقبل مودتي لك وتقديري لأعمالك التي لها نكهتها الخاصة

السلام عليكم

أخي رشدي أسعد الله أيامك

لكي يتم الترقيم التلقائي بعد كل مسح زد السطر التالي

[f11] = [f11] + 1

Sub clear()

Range("A14:G45").ClearContents

[f11] = [f11] + 1

End Sub