كيفية تحديد كل عمود ن في إكسيل؟

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

حدد كل عمود n مع VBA

حدد كل عمود ن مع كوتولس ل إكسيل

حدد كل عمود n مع VBA

رائعة حقا! استخدام علامات تبويب فعالة في Excel مثل Chrome و Firefox و Safari!

وفر 50٪ من وقتك ، وقلل آلاف النقرات بالماوس كل يوم!

---

يبدو أنه لا توجد طريقة بسيطة باستثناء كود VBA لحل هذه المشكلة. يرجى القيام بالخطوات التالية:

1. قم بتمييز النطاق الذي تريد تحديده في كل عمود نون.

2.Click المطور > Visual Basic أو اضغط على المفتاح ألت + فسنومك، جديد Microsoft Visual Basic للتطبيقات سيتم عرض النافذة ، انقر فوق إدراج > وحدة لإدخال الكود التالي في الوحدة النمطية:

Sub EveryOtherColumn()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox("Enter column interval", xTitleId, Type:=1)
For i = 1 To InputRng.Columns.Count Step xInterval + 1
    Set rng = InputRng.Cells(1, i)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireColumn.Select
End Sub

3. ثم اضغط  لتشغيل الرمز ، وسيظهر مربع موجه لتذكيرك بتحديد نطاق للعمل معه. انظر لقطة الشاشة:

4. انقر OK، ثم أدخل عدد الفواصل الزمنية في مربع حوار منبثق آخر. في هذه الحالة ، أدخل 3 في المربع. انظر لقطة الشاشة:

5. انقر OK. الآن يختار كل عمود ثالث في التحديد. انظر لقطة الشاشة:

ملاحظة: يمكنك تحديد الرقم في الثانية كوتولسفورإكسيل الحوار لتلبية حاجتك.

لكن في بعض الأحيان ، تحتاج إلى تحديد عمودين بفاصل زمني. الكود أعلاه لا يمكن أن يعمل ، كيف تفعل؟

حدد كل عمود ن مع كوتولس ل إكسيل

كوتولس ل إكسيل: مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود خلال 30 يومًا. احصل عليها الآن.

بإضافة إلى كوتولس ل إكسيل، يمكنك تحديد عدد معين من الأعمدة في فترات زمنية محددة. يرجى القيام بالخطوات التالية:

1.Click كوتولس > حدد أدوات > حدد فاصل الصفوف / الأعمدة، انظر لقطة الشاشة:

2. حدد فاصل الصفوف / الأعمدة سيظهر مربع الحوار. ثم اضغط زر لتحديد النطاق الذي تحتاجه ، اختر الأعمدة من حدد القسم، وحدد الرقم الذي تريده في الفاصل الزمني و الأعمدة القائمة المنسدلة ، هنا نختار عمودين في كل عمود ثلاثي الأبعاد. انظر لقطة الشاشة:

3.Click OK. سيحدد عمودين بفترتين في التحديد. انظر لقطة الشاشة:

ملاحظة: إذا قمت بالتدقيق حدد الأعمدة بأكملها في مربع الحوار المنبثق ، سيحدد الأعمدة بأكملها في الورقة. انظر لقطة الشاشة:

المقالات النسبية:

• حدد كل الصف الآخر أو الصف التاسع في Excel
• انسخ كل صف آخر
• احذف كل صف آخر
• إخفاء كل صف آخر

---

أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

• إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
• سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
• دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
• حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
• نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
• استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
• سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
• اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
• أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

اقرأ أكثر... تحميل مجاني ... شراء... 

---

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...