Visual Basic Online Course - Excel 2003 Part 6

Visual Basic 6 By

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

VB6 Excel


فى الدرس السابق تعلمنا كيفية طباعة الـ Excel.
درس اليوم ان شاء الله تعالى يتناول موضوع هام و هو التنسيق و لكن ليس كما نعرفه "بدون الأكواد" و كيفية ربط الـ Excel الفيجوال بيزك و حفظ التغييرات عليه و عرضه فى الفيجوال بيزك 6
الجـــــــــزء السادس - موضوعات هامه

الموضوع الأول : التنسيق

سنقوم بالتطبيق على المثال السابق و المطلوب هو :
1) عمل اطار للفاتورة
2) تكبير خط الـ Heading للفاتورة
3) جعل الأرقام مقربه لأقرب رقمين عشريين
4) تلوين عنوان الفاتورة بلون مخالف و الجسم الفاتورة بلون اخر
5) توسيع حجم الخلايا .

و فى النهايه ستظهر الفاتورة كما بالشكل التالى :

vb6 Excel
vb6 Excel

و سنبدأ الأن ببرمجه المشروع لاضافة أكواد تمكننا من العمل على الـ Excel ليظهر بهذا الشكل من داخل الـ Visual Basic 6.0 مع العلم أنه يمكن عمل ذلك مباشرة من داخل الـ Excel و لا يزال ضمن البرنامج و لكن اذا كنت لا تريد أن يفتح أى شخص ملف الـ Excel التابع للبرنامج و تغيير تنسيقه و قمت بحمايته فاضافة أكواد لتنسيق الـ Excel من داخل البرنامج هو الحل الأمثل .

- نفتح المشروع و نضيف Form جديده تكون بهذا الشكل :
vb6 Excel
vb6 Excel - Display Excel
و الـ Form عليها أداه تسمى : Microsoft Office XP Web Components تجدها فى الـ Component Ctrl+T قم باضافتها الى شريط الأدوات ثم ادراج SpreadSheet1 على الفورم كما فى الصورة و هذه الأداه غير أداة الـ OLE حيث أنه كان من الصعب التعامل مع تطبيقات الـ Office باداة الـ OLE ....

المطلوب منا عند فتح الـ Form1 لتنسيق الفاتورة الخاصه بنا أن نجدها فى الأداة و بالتالى فى الحدث Form_Load نكتب الكود التالى :



حيث قمنا بـ :
- تنسيق مكان الأداه على الفورم
- فتح الفاتورة الموجوده بالـ Excel بدون اظهار الـ Excel
- تعيين Sheet العمل
- نسخ خلايا الـ Sheet
- لصق خلايا الـ Sheet فى الأداه SpreadSheet1

الخطوه الثانيه هى مفتاح حفظ التغيرات التى تطرأ على الـ SpreadSheet فى ملف الـ Excel الذى به الفاتورة حيث نضع Command1 على الـ Form بعنوان Save To Excel و فى الحدث Command1_Click نكتب الكود التالى :
و ما قمنا بعمله هنا هو :




- تحديد مدى الخلايا المراد حفظها من A1 الى L70 و وضعنا فى الاعتبار أن الفاتورة سيضاف عليها بيانات .
- نسخ الخلايا فى المدى
- لصق الخلايا فى المدى المقابل فى ملف الـ Excel .
- حفظ التغييرات على ملف الاكسل بدون اظهار رسائل تنبيه منه .

 خطوه أخيره لكى نتأكد من أن تم حفظ التغييرات و هى الحدث Form_Unload عند اغلاق الشاشة تظهر رساله "هل تريد الحفظ؟" كالتالى :


لاحظ :
يمكنك الان تنسيق SpreadSheet بالضغط Right-Click عليه حيث تظهر قائمه يمكنك من خلالها تنسيقه مثل الـ Excel و حفظ هذه التغيرات كما فعلنا فى الأعلى .
"حسب Microsoft فانه من غير الممكن ربط الاكسل بالفيجوال بيزك مباشرة" ... لذا يعتبر هذا المثال أقرب طريقه الى عمل .
يمكنك الان عمل (اضافه - حذف - تعديل - بحث) فى الاكسل باستخدام الاداه ...... !
- رابط المثال بالتحديث الأخير MediaFire
- مساعدات خارجيه External Links
1) MSDN
2) SpreadSheet Web Components - MSDN
بهذا الجزء نكون قد قمنا بتغطية أغلب النقاط المرتبطه بالتعامل مع الـ Excel و هناك العديد من النقاط سنقوم ان شاء الله تعالى بتغطيتها فى الجزء الأخير القادم فى المثال العملى ..... تابعونا !

visual basic 6, vb6 source code,vb6 tutorials
My name is Ahmed Samir, I work as an Internal Auditor in a Gov. major co. My passion is in programming and blogging.

VB6 Popular Posts

VB 0.6 TreeView Control lesson Part3

7 comments Visual Basic 6 By
بسم الله الرحمن الرحيم توقفنا فى الجزء الثانى السابق عند خاصية LabelEdit . و موضوع اليوم ان شاء الله عن خاصية SelectedItem " اذا لم تكن قد قمت بتحميل المشروع " SelectedItem Property - خاصية العنصر المختار و موضوع اليوم ان شاء الله عن خاصية SelectedItem أو العنصر المختار و هى خاصية من خصائص الـ ActiveX Control عموما و لكن فى TreeView تشير الى Nodes و هى العناصر التى يمكن اختيارها . الــــــــكود : Object.SelectedItem حيث Object تشير الى Node . - و عند تنفيذ SelectedItem فانه يعود بقيمة هى العنصر التى تم اختيارة من مجموعة العناصر . - مثال : حذف جميع الـ Nodes المختاره و التى ليست Root . اضف مفتاح Command للـ TreeView4 باسم Delete Child Nodes و الصق الكود التالى فى الحدث Click ' If the selected object is not the root, then remove the Node. If TreeView4.SelectedItem.Index <> 1 Then Treeview4.Nodes.Remove TreeView1.SelectedItem.Index End If   قم بتجريب المشروع و اختار اى Node من TreeView4 ثم اضغط على Command باسم De
Visual Basic 6.0

vb6 ms-access 2003 design phonebook 2

Post a Comment Visual Basic 6 By
Image
MS-Access 2003 Database design vb6 MS Access 2003 Database Design for Phonebook project In this part of the tutorial we will design the database according to the VB6.0 Project Requirements , we have 3 TextBoxes and 1 Image control, so we will need 4 fields in the database table. We will create only one table because there is no need to create two, just simply like that. Note, there are several ways to store data from Visual Basic windows application project on the hard drive, using MS-Access 2003 is one of the easiest ways to accomplish this task, considering your are creating a personal windows desktop application, also it is a very handy and effective method considering creating this application for some else (client). If you don't have Microsoft Access 2003, then download it included in MS Office 2003 package from Microsoft. Access 2003 Database is the most well known database ever used with Microsoft Visual Basic 6. Microsoft Access 2003 (*.mdb) file capacity is 2GB, of course
Visual Basic 6.0

Free download Visual Basic 6 Documentation MSDN

Visual Basic 6 By
Image
Free download Visual Basic 6 Documentation MSDN Free download Visual Basic 6 Documentation MSDN What is visual basic 6 MSDN ? It stands for Microsoft Developer Network. How is VB6 MSDN useful ? It is a collection of sites ( msdn.microsoft.com ) for the developer community that provide information, documentation, and discussion that is authored both by Microsoft and by the community at large. Recently. It is available in many languages. Online Visual Basic 6 (vb6) MSDN link at Microsoft.  Here Online Visual Basic 6 (vb6) MSDN previous version .  Here Download Visual Basic 6 (vb6) MSDN. vb6 MSDN CD1 (DN60AENU1) zip  109.05MB(Password: vb6access2003.blogspot.com) vb6 MSDN CD2 (DN60AENU2) zip  537.32MB (Password: vb6access2003.blogspot.com) Download Visual Basic 6 (vb6) Samples.  Here Download Lou Tylee best seller book - VB 0.6.pdf  Here ♥   Visual Basic 6.0 Course Online : Automate MS-Access Database in Visual Basic 6.0  though a net work Visual Basic 6.0 An
Visual Basic 6.0