+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : المساعدة في برنامج فيجوال مع الاكسل (/showthread.php?tid=8685)
المساعدة في برنامج فيجوال مع الاكسل - ohm22d - 28-04-13
ارجو مساعدتي في تحويل هذه الخوارزمية الى برنامج فجوال المصاحب لبرنامج اكسل MS excel
ربما يوجد تداخل او جمل غير مفهومة لكني اريد الخطوط العريضة لكيفية كتابة البرنامج بلغة vb المصاحبة للاكسل
Ti يمثل عمود في الاكسل فيه بيانات حرفية SPi هو بيانات في احد الاعمدة
E.S يمثل ناتج معادلة رياضية لها جذر تربيعي
SP1=0
SP2=0
K=0
FOR P=1 TO N
FOR i=1 TO N
IF(Ti="2M");
SP1=SP1+SPi
SP2=SP2+(SPi)³
IF(OR(Ti="2S";Ti="2R");
SP1=SP1+SPi
SP2=SP2+(SPi)³
Next i
for k=0 TO i
E.S(K,12)=√(SP2/SP1)
Next k
IF(Ti=" ");EXIT FOR
next p
ارجو المساعدة
المساعدة في برنامج فيجوال مع الاكسل - ohm22d - 28-04-13
لرؤية الخوارزمية بشكل اوضح انسخها الى ملف word
SPi بيانات عددية