[حامد ربيع احمد حسنين]

الى الاخ الاستاذ الفاضل سيف سالم قبل ان اعطيك الحل فهذا ماقد تعلمته منشرح استاذى الفاضل أ/ احمد قرنى اليكم الحل مع جزيل الشكر
سيتم الحل عن طريق التحويل من امر for Next الى امر Do While
x= 1
y=3
Do Whlie <=12
y=y+x
x=x+3
loop MsgBox X
وان كنت مخطئآ فالحل ستكون القيم
x=13
Y=25 وهذا ماقد تعلمته من استاذى احمد قرنى ولكنى اتطلع الى المزيد منكم وشكرآآآآآآآآآآآآآآآآآآ