كيفية استخدام offset مع كائن النطاق في vba؟

باستخدام OFFSET مع كائن النطاق، يمكنك التنقل من خلية إلى أخرى في ورقة العمل ويمكنك أيضًا تحديد خلية أو نطاق. كما أنه يتيح لك الوصول إلى الخصائص والأساليب المتوفرة لديك مع كائن النطاق لاستخدامه، ولكن يجب عليك تحديد الوسائط في OFFSET لاستخدامه.

استخدام OFFSET مع كائن Range

  1. حدد النطاق الذي تريد البدء منه.
  2. أدخل نقطة (.) للحصول على قائمة بالخصائص والأساليب.
  3. حدد خاصية الإزاحة وحدد الوسائط (الصف والعمود).
  4. في النهاية، حدد الخاصية المراد استخدامها مع الإزاحة.
إزاحة مع كائن النطاق

حدد نطاقًا باستخدام OFFSET

يمكنك أيضًا تحديد نطاق يمثل عدد الصفوف والأعمدة البعيدة عن النطاق. خذ سطر التعليمات البرمجية أدناه، والذي يحدد نطاقًا مكونًا من خليتين يتكون من خمسة صفوف لأسفل و3 أعمدة إلى اليمين.

 Range("A1:A2").Offset(3, 2).Select
حدد النطاق باستخدام الإزاحة

وبصرف النظر عن هذا، يمكنك أيضًا كتابة التعليمات البرمجية لتحديد النطاق باستخدام حجم مخصص. خذ بعين الاعتبار مثال التعليمات البرمجية التالية.

 Range(Range("A1").Offset(1, 1), Range("A1").Offset(5, 2)).Select
حدد النطاق باستخدام الحجم المخصص

لفهم هذا الرمز، تحتاج إلى تقسيمه إلى ثلاثة أجزاء.

مقسمة إلى ثلاثة أجزاء

أولاً، في كائن النطاق هذا، لديك خيار تحديد الخلية الأولى والأخيرة من النطاق.

خيار لتحديد الخلية الأولى

والآن لنعود إلى المثال:

  • في الجزء الأول، استخدمت كائن النطاق للإشارة إلى الخلية بصف واحد لأسفل وعمود واحد إلى يمين الخلية A1.
  • في الجزء الثاني، استخدمت كائن النطاق للإشارة إلى الخلية التي تحتوي على خمسة صفوف لأسفل وعمودين على يمين الخلية A1.
  • في الجزء THRID، استخدمت الخلايا الموجودة في الجزء الأول والثاني للإشارة إلى نطاق وتحديده.

استخدام OFFSET مع ActiveCell

يمكنك أيضًا استخدام الخلية النشطة بدلاً من استخدام نطاق محدد مسبقًا. هذا يعني أنك ستحصل على إزاحة ديناميكية لتحديد خلية تنتقل من الخلية النشطة.

 ActiveCell.Offset(5, 2).Select

سيحدد سطر التعليمات البرمجية أعلاه الخلية الموجودة أسفل الخلية بخمسة صفوف وعمودين على يمين الخلية النشطة.

استخدام OFFSET مع ActiveCell لتحديد نطاق

استخدم التعليمة البرمجية التالية لتحديد نطاق في الخلية النشطة.

 Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(5, 2)).Select

لفهم كيفية عمل هذا الكود، تأكد من مراجعة هذا الشرح.

انسخ نطاقًا باستخدام OFFSET

 Range(Range("A1").Offset(1, 1), Range("A1").Offset(5, 2)).Copy Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(5, 2)).Copy

استخدام خاصية الخلايا مع OFFSET

يمكنك أيضًا استخدام الخاصية OFFSET مع خاصية CELLS. خذ بعين الاعتبار التعليمة البرمجية التالية.

 Cells(1, 3).Offset(2, 3).Select
خاصية الخلية مع الإزاحة

يشير الكود أعلاه أولاً إلى الخلية A1 (كما حددتها) مع الصف الأول والعمود الأول باستخدام خاصية الخلايا، ثم يستخدم خاصية الإزاحة لتحديد الخلية التي تقع في صفين لأسفل وتحتوي على ثلاثة أعمدة.

اضف تعليق

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *