حمادة عمر

بارك الله فيكم 

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

هل تقصد اخي الكريم بتشغيل الماكرو او انه مش مفتوح عليه عملية تمكين الماكرو ام ماذا او مزيد من التوضيح 

تقبل خالص تحياتي 

من الافضل دائما اخي الكريم ارفاق ملف كمثال لما هو مطلوب لتسهيل الطلب وفهمه

وبداية لدي صورة لاحد الاخوة الافاضل ( الاخ الكريم / خالد الرشيدي ) تشرح كود لدالة VLOOKUP 

ارجو ان يفيدل لحين ردك

تقبل خالص تحياتي

السلام عليكم

الاخت الفاضلة / hana jabari

بالفعل كما قال الاخ الكريم / شريف محمد ... جزاه الله خيرا

انه من الافضل دائما ارفاق ملف كمثال ليتتضح الطلب وفكرنه

ومبدئياً وعلي حسب علمي لا يمكن طباعة محتوي الليست بوكس مباشرة الا بالتحايل علي الأمر

بعمل شيت او ملف وسيط ليتم نسخ بيانات الليست بوكس اليه ومن ثم الطباعة وأظن ان الروابط التاليه بها ما تريد او نفس الفكرة التي أقصدها

تقبلي خالص تحياتي

أو  الرابط التالي ....

السلام عليكم

الاخ الكريم / محمود الحربي

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

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

قم باختيار المسلسل في شيت رقم 2 ثم اضغط علي زر طباعة وشاهد النتيجة ( هل هذا هو المقصود )

ولكن لي استفسار بخصوص ازرار الطباعة امام كل اسم في الشيت رقم 1 ( ما هي اهميتهم ؟ )

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

في حين يمكن الاستغناء عنهم بزر واحد فقط ام ما هو المقصود والمطلوب

جرب واشعرنا بالنتائج

تقبل خالص تحياتي

نموذج طباعة-SAMA.rar

شاهد اخي الكريم الروابط التالية

ان شاء الله بها طلبك او مزيد من التوضيح بمثال فبه مزيد من الاكواد فيوجد به مثلا : -

1- ملف يمكن التحكم في فترة توقفه واختفاؤه ( حاليا 10 ثواني )

2- ملف يفتح لـ 5 مرات فقط ثم يغلق بعدها

3- جعل الملف ينتحر و يحدف نفسه من الجهاز تلقائيا بوقت محدد

4- ملف يفتح لعدد 5 مرات وبعد ذلك لا يفتح الا بعد طلب رقم سري وان كان الرقم غير صحيحا يعمل علي اغلاق الملف

اظن اخي الكريم ان الكود والطريقة المقدمة من الاستاذ / زيزو ... جزاه الله خيرا

هي افضل الطرق ولكن ان كنت لا تريد استخدام الكود فيمكنك استخدام طريقة ( التصفية ) ان كانت تنفع معك

واظن انها ستؤدي نفس الغرض

او مزيد من التوضيح لفكرتك التي تريدها

تقبلوا خالص تحياتي

في 11/2/2017 at 12:53, حمادة عمر said:

 كل ما عليك هو تغيير الخاصية الخاصة بالفوررم نفسه والمسماه Right to Left من TRUE  الي FALSE

وتم تنفيذه لك بالمرفق

السلام عليكم

الأخ الكريم / المسلم العربي

بارك الله فيك

الملف المرفق الخاصية تم تغييرها فيه ولذلك تعطي النتائج صحيحة والتغيير يتم منمن TRUE  الي FALSE وليس كما ذكرت انت

فستجدها بالملف FALSE  اتركها كما هي وستجد ان شاء الله النتائج صحيحة ولكني ذكرت لك الطريقة فقط لتقوم بها بنفسك بعد ذلك

جرب واخبرنا بالنتائج

تقبل خالص تحياتي

السلام عليكم

الأخ الكريم / المسلم العربي

بارك الله فيك

بالنسبة للطلب الأول بتعديل ترتيب نتائج البحث كل ما عليك هو تغيير الخاصية الخاصة بالفوررم نفسه والمسماه Right to Left من TRUE  الي FALSE

وتم تنفيذه لك بالمرفق

بالنسبة لطلب احضار الصورة اليك المرفق به ما تريد

كل ما عليك هو البحث عن الاسم الذي تريده وعند ظهور نتائج البحث في الليست بوكس واختيارك بكليك احد الاسماء المراد احضار الصوره له

تظهر لك صورته مباشرة في مكان الصورة وان لم يكن له صوره لديك سيظهر في الصورة انه لا توجد صورة ( كما هو في الصورة )

ولكن يجب الآخذ في الاعتبار :

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

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

جرب المرفق واخبرنا بالنتائج

تقبل خالص تحياتي

New folder (7).rar

السلام عليكم

اخي الكريم

من الافضل دائما عن تقديم اي سؤال ان يتم اضافة مرفق كمثال لما تريده فهو يجعل لطلب اوضح

ليمكن للكثير مساعدتك

شاهد المرفق علي حسب فهمي لطلبك وفي المرفق

( اختار من القائمة في العمود A  واضغط انتر او قم بالخروج من الخلية بالاسهم وشاهد النتيجة في العمود B )

ان شاء الله يفي بطلبك

تقبل خالص تحياتي

HAMADA OMAR-DATE.rar

برجاء ارفاق ملف كمثال لطلبك اخي الكريم

ولكن مبدئياً اليك هذا الملف من اعمال احد الاخوة للحفظ بصيغة PDF

حفظ ملف بامتداد PDF.rar

السلام عليكم

الاستاذ الكريم / مناد سفيان

بارك الله فيك

مواضيعك جميلة ومفيدة للجميع

ولكن لاحظت ان جميع مواضيعك يكون محرر الاكواد مغلق برقم سري

مما يجعل الافادة للجميع غير متاحة فيكون الملف للعرض فقط وليس للافادة والتعلم والتعليم

فيوجد منا البعض قادرين علي فتح المحرر ومشاهدة الاكواد بطرق كثيرة ولكن الغالبية العظمي لا يمكنها ذلك

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

حيث ان هذا المنتدي أسرة لنا جميعا نتعلم ونعلم بعضنا البعض

ومن الممكن ان أطمع أكثر فيكم .. حيث ان لديكم طريقة جميلة في تركيب الاكواد من الاكيد انها ستفيد الكثيرين

ولكن شرحك لها بالفرنسية في محرر الاكواد يعيق البعض ( أكيد أنا منهم طبعاً .. ههههه ) ياريت لو باللغة العربية لزيادة الافادة فقط

وعذرا لو انني تدخلت في شئ ما يخصك .. ارجو قبول اعتذاري

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

تقبل خالص تحياتي

السلام عليكم

الاخ الكريم / ابو اشرف

بارك الله فيك

وجزاك الله خيرا علي كلماتك الطيبة ... وفقكم الله لما يحبه ويرضاه والي ما فيه خيركم

شاهد المرفق

تقبل خالص تحياتي

مبيعات الاحرف11.rar

السلام عليكم

الاخ الكريم / ابو اشرف

بارك الله فيك

اليك الملف المرفق يوجد بالملف فورم عند فتحه تجد فيه تكست بوكس عندما تضيف فيه مبلغ

يضيف المبلغ في خانة السداد واذا قمت باضافة مبلغ آخر في التكست بوكس فان الكود يقوم بجمع القيمة الموجودة في الخلية

بالاضافة للقيمة القديمة الموجودة في خانة السداد في الاكسيل

ولكن الكود غير مطبق الا علي الخلية B2 الموجود بالملف المرفق باللون الأحمر ( علي سبيل التجربة فقط )

لحين ردكم هل هذا هو المطلوب أم لا

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

حسب حاجتك ام لا  .. وفي انتظار ردك

تقبلوا خالص تحياتي

ادخال مبلغ بخلية11.rar

في 10/23/2017 at 07:40, أبو شرف said:

 لدي منتج قيد التصنيع وخلال فترة التصنيع يتم سداد مبلغ المنتج وانا لا استطيع ان اضيف اكثر من خلية في عامود الدفع

السلام عليكم

الاخ الكريم / ابو اشرف

عذرا موضوعك وطلبك مبهم بعض الشئ

تقول انك لا تستطيع ان تضيف أعمدة اخري للسداد والسداد يتم جزئياً اي انه لديك ملف جاهز

اولا: لماذا لا تقم بوضع مثال واضح لما تريد بمرفق

ثانيا : هل يتم الاضافة في خانة السداد عن طريق يوزرفورم ام عن طريق الاكسيل مباشرة

ثالثاً : هل تقصد ان يقوم الاكسيل بجمع المبلغ الموجود علي المبلغ المضاف ويضع الاجمالي ثم بعد ذلك يضيف الاضافة التالية وهكذا

          ليكون الموجود في خلية السداد هو ( اجمالي المبلغ المسدد حتي آخر اضافة ) ام ماذا ؟؟

برجاء مزيد من التوضيح للفكرة والطلب

واظن ان هذا هو ما يجعل الجميع يقرأون الموضوع ولا يوجد رد .. لعدم فهم الطلب وعدم تصور شكله

تقبل خالص تحياتي

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

موضوع اكثر من رااائع ياريت الكل يشارك حتي ولو من باب المعرفة والتعرف علي الاقل

تقبل خالص تحياتي

ومن احد الحلول ايضا

مع العلم انه بعد رد القدير .. بن عليه .. جزاه الله خيرا

لا يوجد رد ... ولكن لاثراء الموضوع

ضع المعادلة التالية في الخلية A2 في الورقة 2 ثم قم بسحب المعادلة علي باقي العمود A

=IF(B2=0;"";ROW()-1)

تقبلوا خالص تحياتي

الاخ الكريم / محمود ربيع

بارك الله فيك

الاخ والاستاذ / شوقي ربيع ... جزاه الله خيراً

له موضوع مستفيض في هذه الآداه واظن انه لم يترك عنها شيئاً واظن انه سيفيدك كما تريد

واليك رابط الموضوع

تقبل خالص تحياتي

السلام عليكم

الاستاذ والمهندس والقدير / طارق محمود .... جزاك الله خيراً

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

وبرغم غيابك الطويل عن المنتدي واطلالاتك البسيطة

ولكن والله بالفعل ما تعلمته من هذا الموضوع ومن شخصك الكريم

هو حبك لفائدة الجميع ... وايضا تفسيرك للاكواد وشرحك لها وتقديمك لها باسهل الطرق

وفقكم الله لما يحبه ويرضاه ولما فيه الخير دائما ان شاء الله

تقبل خالص تحياتي

لتنفيذ طلبك اخي الكريم

قم باستبدال السطر التالي الموجود في الكود لديك وهو

Set ws = Worksheets("بيانات")

بالسطر التالي

Set ws = ActiveSheet

جرب واشعرنا بالنتائج

تقبل خالص تحياتي

السلام عليكم

الاخ الكريم /waledms

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

وقمت بعرض نسخة منه وعلي ما اظن ان السبب فيما تسأل عنه هي المعادلة الموجودة في الخلية V1

قم باستبدالها بالمعادلة التالية وجرب واخبرني بالنتيجة

=COUNTA($B:$B)+1

تقبل خالص تحياتي