DR.ZUHAIR

استاذ عماد الحسامي انت استاذ كبير ومكسب للمنتدى سيستفيد الجميع من تمكنك الرائع في الاكواد .

ولك من عندي بوسة فوق الراس يطولي عمرك ... تحياتي الخاصة لك

اخي العزيز زياد

اطال الله عمرك وارضاك واراح الله بالك

الله ينور عليك وكلامك صحيح 100 بالمئة

ومداخلتك أتت في الوقت الصحيح

وسهولة في صياغة المواضيع

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

جزاكما الله عنا الجنة،،، هذا هو المطلوب تماماً،،،شكرأ شكرأ

الاخ : عماد الحسامي

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

جزاهم الله جميعا خير لك اصل للحل وذلك كالتالي:

Sub IFIF()

X = Sheets(1).Range("D2").Value

Y = Sheets(2).Range("F3").Value

Z = Sheets(3).Range("E2").Value

 A = Sheets(1).Range("C7").Value

 B = Sheets(1).Range("D7").Value

 C = Sheets(1).Range("E7").Value


If X + Y > Z Then

 A = 1

 B = 2

 C = 3

Else

 A = 44

 B = 99

 C = 55

End If


End Sub

ولكن المتغيرات A B C في التعبير عن القيم المشار اليهالم تفي بالغرض ،،، ولكن عندما اضع مجال القيمة كاملاً فإن ناتج الحل يكون صحيح أي عندما أضع :

Sheets(1).Range("c7").Value = 1

Sheets(1).Range("d7").Value = 2

Sheets(1).RANGE("e7").Value = 3

ففي رأيكم ما السبب

وبارك الله فيك مقدماً

الاخ دغيدي

اشكرك على هذا الرد الطيب

ولكن لماذا لاتعمل PG UP AND PG DN

الاخ khaledHHH

اين المرفق ؟؟

الاخ دغيدي

لقد وجدت هذه المشاركة للاخ زياد علي

ممكن يكون فيها طلبك :

http://www.officena.net/ib/index.php?showtopic=30360

ما أجمل روح الأخوة في هذا المنتدى الرائع

حياكم الله أيها الأعزاء

الحمد لله

هنا الحس الإنساني الجميل بحيث نرتقي ونسمو ابتغاء وجه الله ,فقد

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

نأسف أخونا زياد علي

على التأخر في الدعاء لوالدك وعن السؤال عنه

والحمد لله انه قد تماثل للشفاء

السلام عليكم

استاذ زياد علي

ما شاء الله لا قوة إلا بالله ،،، هذه السلسلة فعلاً كنوز ،،، وقلما نجد من يتحدث عن هذا الموضوع كمرجع عربي على صفحات الانترنت

ياريت إدارة المنتدى تثبت الموضوع ليستفيد الجميع ولتكون مرجع لهم،،،

مشكور وبارك الله فيك

استاذ زياد علي

استاذ طارق

الله يفتح عليكما دنيا واخرة

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

مجهود ممتاز

نحتاج المزيد