الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

إذا تكررت البيانات بأداة Combo

مغلق
بدأه arafa في 7 يناير 2005 · 32 رد · 2,582 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#26

اخي الكريم abulyaman

انا جربة مرة اخري على الويندوز اكس بي اشتغل عادي

لكن مع ويندوز 98 لم يعمل

***************************

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

تتطلع على الملف المرفق

الذي يحوي مثال عملتة وينقصة فقط

1-التصدير الي اكسل

2- الطباعة

ورقم1 عندي هي الاهم الانها قد تكفي عن الثانية

وجزاك الله الخير ووفقك

frmTable.zip

#27

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

ربنا يوفقك وييسر لك كل أمر عسير

أما بخصوص طلبك - أبشر - بسيطه خالص

أولا المثال الذى أرفقته يتعامل مع MsFlexGrid وليس MsHFlexGrid يعنى لو حذفت الـ H من المديول هتظبط معاك من هذا الجانب

وثانيا فى المديول أنا معتبر أنك أضفت مرجع Reference للمكتبة Microsoft Excel Library Object ودى غيابها هيسببلك خطأ لو أضفتها للبرنامج هيظبط بإذن الله

ونفس الكلام فى مديول الطباعة كان مثالى يتعامل مع MsHFlexGrid

هذا لحين أعدّل المثال المرفق وأرده إليك - بعون الله

أما موضوع أنه اشتغل من أكس بى ولم يشتغل من 98 فهذا موضوع كبير الحمد لله أنك مش محتاجه - لأنه وراءه أسباب كثيرة

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#28

الحمد لله

عدلت لك المثال وأصبح يطبع ويصدر للأكسل وينقل الأعمدة ويعطى عدد ومجموع الخلايا المظللة (المحددة)

لا تنسانا من الدعاء

ربنا يوسع علينا وعليكم فى العلم والرزق

frmTable2.zip

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#29

اخي الكريم والفاضل abulyaman

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

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

اما بعد

فانا لم افهم ما تقصدة

ثانيا فى المديول أنا معتبر أنك أضفت مرجع Reference للمكتبة Microsoft Excel Library Object

عندما انزلت ما قمت به اخي الكريم

نقرت مباشرة الي زر اكسل

فظهرة هذة الرسالة

Compile error:

Can't find project or library

وكذالك في زر الطباعة يعطي نفس الرسالة

فا المشكلة اعتقد انها في الReference التي لم افهمها

ولا اعرف كيف اضفها

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

ملحوظه: بجوار جدتي الله يخليها و يحفظها ذكرة لها ماقمت بة من عمل

وتقول لك جزاك الله الف خير

#30

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

أخى العزيز

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

ويجمعنا مع الأحبة محمد صلى الله عليه وسلم وصحبة فى الجنه - ويرزقنا رؤية وجهه

ويخلص لنا أعمالنا فى الدنيا لوجه لا نسأل غيره ولا نرجوا إلا رضاه

أما بعد

بخصوص إضافة مرجع فى مشروعك

لو ذهبت لقائمة Project ومنها اخترت الأمر References

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

وأخرى بدون علامة صح للدلالة على أنها غير مدرجة فى مشروعك

ببساطة ابحث عن مكتبة الإكسل وأضفها لمشروعك

ستجد اسمها Microsoft Excel 11.0 Object Library أو رقم غير 11 حسب اللى عندك

ولكن ليس شرط أن يكون الاعتراض بسبب الإكسل وحده، فكل جهاز ظروفه مختلفة

لو حصلت كود بيصطاد الخطأ مثل On Error .... حاول تهمشه

بذلك ستجد المترجم بيتوقف على المسبب للخطأ ومنها تعرف إن كان إكسل ولا MsFlexGrid نفسها ولا سبب آخر

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

وربنا يعينى ويعينك على طلبك - لن أقول غايتك فالله غايتى وغايتك .

موفق إن شاء الله

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

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#31

اخي الكريم والفاضل والعزيز abulyaman

جزاك الله الخير على تعاونك المميز والجميل وردودك الاجمل

التي فيها الحل المميز بكل صراحة

وادعو الله العلى القدير ان يزيد في علمك و رزقك وان يدخلك الفردوس الاعلى

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

امابعـــــــــــــــــــــــــــــــــــد

*ان ردك كان مميز وجميل والطريقة نجحت على ويندوز اكس بي

ولم تنجح على ويندوز 98

ولم اعرف السبب؟؟؟؟

*اما النقطة الثانية

- هي انه كيف يمكن تصدير جدولين في نفس ورقة العمل

-وانه كيف يمكن طباعة الجدولين في ورقة واحدة

وانا قمت برفق المثال بعد التعديل واضافة الجدول الثاني له

فهل ممكن ان تتكرم جزاك الله الخير وزاد في علمك ان توضح لنا كيف؟؟؟

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

-و كيف يمكن طباعة الجدولين في ورقة واحدة

باالمناسبة انا في جامعة الملك فيصل King Fisal University

ووصلت اليوم الجمعة من الشمال الى مقر الجامعة ولم انساك من الداعاء

frmTables.zip

#32

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

أخى فى الله - ربنا يبارك لك ويجزيك خير أكثر مما تتمنى - إنه هو الكريم العلى القدير

لو رجعت للمشاركات فى هذا المنتدى ستجدنى سألت هذا السؤال من قبل بخصوص إرسال أكثر من جدول فليكس جريد لنفس ملف الإكسل المفتوح - ولم يجبنى أحد

ومازلت أبحث عن حل لهذا السؤال ولكن بتراخى لأنى مشغول لشوشتى اليومين دول

بس نستعين بالله يهدينا سواء السبيل

لو تضع لى إيميلك يمكن ربنا يكرمنى به فى أى وق أرسله لك - ولعله لا يكون بعد فوات الأوان

والله المستعان

أخوك أيمن همام - مصرى أعمل بالسعودية - الاحساء

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#33

اخي الكريم المحترم ايمن

هذا هو ايميلي

ksa_kfu@hotmail.com

وانا حاليا في الهفوف لغاية نهاية الدراسة

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

وشكرا لك

والله سبحانة في عون العبد مادم العبد في عون اخية

هذا الموضوع مغلق.

مواضيع مشابهة