ملف اكسل

Jun 07

ملف اكسل

هذا البرنامج يَمر على كل الخلايا المحتوية لأرقام المصاريف عن طريق For ….To بمتغيري�

نبدأ بإنشاء نموذج. من محرر فيجوال بسيك للتطبيقات من إكسل اختر UserForm من الأيقونة الثانية من اليسار كما بالصورة.


ملف اكسل

تحميل البرنامج لا يمكن تحميل برنامج مايكروسوفت اكسل 2010 منفردا بل من خلال تحميل حزمة مايكروسوفت أوفيس 2010 كاملة من هنا Microsoft Excel 2010



فيديو ملف اكسل

اكسل vba الترحيل من ملف اكسل الى ملف اكسل اخر

مقالة عن ملف اكسل

ناقشت في مقالة سابقة فوائد تعلم واستخدام فيجوال بيسك للمهندسين الصناعيين والمديرين وغيرهم وأوضحت سهولة استخدام فيجوال بيسك وتَوفره مع برامج ميكروسوفت. ثم أتبعت ذلك بمقالة توضح مبادئ استخدام فيجوال بيسك مع برنامج إكسل. أحاول في هذه المقالة إضافة بعض الأمثلة وإلقاء الضوء على مواضيع أكثر تقدما. لاحظ أنك تحتاج قراءة المقالتين السايقتين لكي تستفيد من هذه المقالة.

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

سنقوم ببناء برنامج بسيط يقوم بفحص جميع أرقام التكاليف ويقوم بإظهار تلك التي تتجاوز الألف بأن يجعل الخط سميكا ولون الكتابة أزرقا. هذا البرنامج يمكن كتابته كالآتي:

Sub checkexpenses() ‘for each column For j = 2 To 8 ‘for each row in the table For i = 5 To 16 x = Worksheets(“sheet1”).Cells(i, j) ‘check if the value of the cell is greater than 1000 If x > 1000 Then ‘if the value is greater than 1000 then make the font bold and the color blue Worksheets(“sheet1”).Cells(i, j).Font.Bold = True Worksheets(“sheet1”).Cells(i, j).Font.ColorIndex = 32 End If

Next i Next j End Sub

هذا البرنامج يَمر على كل الخلايا المحتوية لأرقام المصاريف عن طريق For ….To بمتغيري�

Source: https://samehar.wordpress.com/2007/08/27/a260807/


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