زهرة122 قام بنشر ديسمبر 13, 2020 مشاركة قام بنشر ديسمبر 13, 2020 السلام عليكم اساتذتى الكرام ... أرجو التكرم والتعطف على مساعدتى فى الأتى : هل يمكن توليد ارقم عشوائية فى الخلايا a3 b3 c3 d3 لتساوى مجموعها المجموع فى الخلية e3 8888888.xlsx رابط هذا التعليق شارك More sharing options...
أفضل إجابة سليم حاصبيا قام بنشر ديسمبر 13, 2020 أفضل إجابة مشاركة قام بنشر ديسمبر 13, 2020 جربي هذا الملف كلما نريدين مجموعة اضغطي عل الزر Run code Option Explicit Sub Arkam_3ashwa3iat() Dim Formule$ Range("A3:C6").Formula = _ "=RANDBETWEEN(1,$E3/3)" Range("A3:C6").Value = _ Range("A3:C6").Value Formule = "=IF(SUM($A3:$C3)>$E3,SUM($A3:$C3)-E3," Formule = Formule & "IF(SUM($A3:$C3)<" Formule = Formule & "$E3,$E3-SUM($A3:$C3),0))" Range("D3").Resize(4).Formula = Formule Range("D3").Resize(4).Value = _ Range("D3").Resize(4).Value End Sub Zahra.xlsm 3 رابط هذا التعليق شارك More sharing options...
زهرة122 قام بنشر ديسمبر 14, 2020 الكاتب مشاركة قام بنشر ديسمبر 14, 2020 جميل جزاكم الله خيرا استاذنا وربنا يعطيك الصحة والعافية رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.