عامر ياسر قام بنشر يوليو 4, 2018 مشاركة قام بنشر يوليو 4, 2018 السلام عليكم ورحمة الله وبركاته الشرح داخل ملف الاكسيل aamir.xlsm رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر يوليو 4, 2018 مشاركة قام بنشر يوليو 4, 2018 هذا الكود Option Explicit Sub give_integer() Range("XFD3").Resize(Application.CountA(Range("D:D")), 1).Formula = _ "=ROUND(d3,0)" Range("d3").Resize(Application.CountA(Range("D:D")), 1).Value = _ Range("XFD3").Resize(Application.CountA(Range("D:D")), 1).Value Range("XFD3").Resize(Application.CountA(Range("D:D")), 1).Clear End Sub 1 رابط هذا التعليق شارك More sharing options...
عامر ياسر قام بنشر يوليو 4, 2018 الكاتب مشاركة قام بنشر يوليو 4, 2018 ابدعت أستاذ سليم حاصبيا وهذا هو المطلوب كل التوفيق لك وزادك الله علماً 1 رابط هذا التعليق شارك 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.