ahmed sherif قام بنشر نوفمبر 3, 2020 قام بنشر نوفمبر 3, 2020 السلام عليكم الاستاذة الكرام اريد تعلم انشاء current region لاستخدامة فيما بعد لعملية النسخ واللصق بواسطة vba المشكلة التى تواجهنى انى عامل جدول بين اعمدته فواصل صغيرة بمعنى من (a1:e10) نطاق f1 فراغ او فاصل ثم من (g1:g10) ثم h فراغ او فاصل ثم من (i1:i10)نطاق L فراغ او فاصل ثم من (k1:k10)نطاق يتكرر النطاق بالكامل بنفس الوضعية من (m1::w10)بنفس الشكل اريد نسخ المجال بالكامل من (a1:w10) بعد تحديدة بواسطة current region داخل ال شيت نفسة للصق اكثر من مرة النسخ واللصق لكن التحديد بواسطة ال current region هو اللى موقف الموضوع مرفق الملف للتوضيح تم تعديل رفع الملف YT.xlsm
سليم حاصبيا قام بنشر نوفمبر 3, 2020 قام بنشر نوفمبر 3, 2020 لا يمكن التعامل مع current region اذا كان يحنوي على خلايا فارغة لذلك ارقع ملفاُ يحتوي على بيانات ولو كانت عشوائية
أفضل إجابة سليم حاصبيا قام بنشر نوفمبر 3, 2020 أفضل إجابة قام بنشر نوفمبر 3, 2020 جرب هذين الماكروين (النسخ يتم الى Sheet2 اذا لم تكن موجودة قم بانشائها) الأول اصرارك على استعمال الـــ current region الثاني النسخ العادي Option Explicit Sub copy_range_1() Rem copy Using CurrentRegion Dim Rag As Range Set Rag = Sheets("sheet1").Range("A1:W13"). _ SpecialCells(4) Rag.Formula = "=""""" Sheets("sheet1").Range("A1").CurrentRegion.Copy Sheets("sheet2").Range("A1").PasteSpecial Rag.Value = vbNullString With Sheets("sheet2").Range("A1").CurrentRegion .Value = .Value End With Application.CutCopyMode = False End Sub '++++++++++++++++++++++++++++++++++++ Sub copy_range_2() Rem Normal copy Sheets("sheet1").Range("A1:W13").Copy Sheets("sheet2").Range("A1").PasteSpecial Application.CutCopyMode = False End Sub 1
ahmed sherif قام بنشر نوفمبر 3, 2020 الكاتب قام بنشر نوفمبر 3, 2020 شكرا استاذ سليم على هذه المساهمة الفعالة بخصوص الاصرار على current region الامثلة المطبقة و الموجودة على اليوتيوب موجوده على نطاق كامل ولم ارى مثال موجود على جدول بينه فواصل لذلك طرحت السؤال فى هذا المنتدى لعل وعسى اجد نتيجة لكن لماذا لا يعمل على جدول فارغ
سليم حاصبيا قام بنشر نوفمبر 3, 2020 قام بنشر نوفمبر 3, 2020 الـ current region هو النطاق الذي يمكنك التنقل به من أول خلية الى اخر خلية دون المرور بصفوف (أو أعمدة ) فارغة الخلايا الفارغة ضمن المربع الأحمر (مثلاً B3 ) هي ايضاً ضمن الـــcurrent region لانه يمكن الوصول اليها بنفس الشرط بينما الخلية E2 لا تحتسب ضمن current region لان العمود D فارغ و كذلك الخلية A7 لا تحتسب ضمن current region لان الصف 6 فارغ باختصار يمكن اعتبار الـــ current region مثل جزيرة في البحر يمكن ان يكون فيها شجر او سكان (الخلايا المليئة) و يمكن ان يكون فيها (لكن ليس كلها) مناطق خالية (الخلايا الفارغة) و عليك التنقل في ارض هذه الجزيرة دون أن تدوس بمياه البحر والـــ used range هو مجموعة من هذه الجزر لكل منها current region خاص بها يمكن تحديد current region بتحدبد اي خلية داخله والضغط على (Ctr+A) مرة واحدة و هذا جواب لماذا لا يعمل على جدول فارغ الصورة توضح ذلك 1
ahmed sherif قام بنشر نوفمبر 3, 2020 الكاتب قام بنشر نوفمبر 3, 2020 جزاك الله كل خير على هذه المعلومة الجميلة 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.