هاني بدر قام بنشر أبريل 14, 2012 قام بنشر أبريل 14, 2012 السلام عليكم ورحمة الله وبركاته مرفق ملف والمطلوب هو نسخ معادلات بناء على وجود بينات في صفوف اخرى وتقبلوا تحياتي هاني بدر Test Income.rar
هاني بدر قام بنشر أبريل 14, 2012 الكاتب قام بنشر أبريل 14, 2012 اعرف انه طلب بسيط وارجو المساعدة بعمل الكود المطلوب لانه مهم جدا عندي
عبدالله المجرب قام بنشر أبريل 14, 2012 قام بنشر أبريل 14, 2012 السلام عليكم جرب هذا الكود Sub Macro1() Range("AL9:BK9").Copy Range("AL11:AL" & [A1000].End(xlUp).Row).PasteSpecial Paste:=xlPasteFormulas Application.CutCopyMode = False End Sub
هاني بدر قام بنشر أبريل 15, 2012 الكاتب قام بنشر أبريل 15, 2012 بسم الله الرحمن الرحيم عزيزي استاذ عبدالله بارك الله فيك هذا هو المطلوب بالفعل بارك الله فيك وذادك من علمه وفضله اخوك هاني بدر
هاني بدر قام بنشر أبريل 15, 2012 الكاتب قام بنشر أبريل 15, 2012 السلام عليكم ورحمة الله وبركاته تم اضافة سطر للكود لمسح البيانات قبل النسخ حيث ان البيانات متغيرة في الصفحة Range("AL11:BK50000").ClearContents Range("AL9:BK9").Copy Range("AL11:AL" & [A50000].End(xlUp).Row).PasteSpecial Paste:=xlPasteFormulas Application.CutCopyMode = False تقبل كل الشكر والتحية لك ولك اساتذة وأعضاء المنتدى الكرام اخوك هاني بدر
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان