انتقل إلى المحتوى الرئيسي

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

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

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

حدد كل عمود n باستخدام Kutools for Excel


السهم الأزرق الحق فقاعة حدد كل عمود n مع VBA

يبدو أنه لا توجد طريقة بسيطة باستثناء كود 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. الآن يختار كل عمود ثالث في التحديد. انظر لقطة الشاشة:

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

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


حدد كل عمود n باستخدام Kutools for Excel

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

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

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

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

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

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


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

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

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


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

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

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have one issue in excel, for example, in a row first five sells are numbered as 1,2,3, 4,5. in the second row also numbered as 1,2,3,4,5 in each sell. then to the third row need to paste the values of above two rows alternatively. means i need answer in each sells in third row 1,1,2,2,3,3,4,4,5,5. how can I do easily in excel? I am waiting for your response because I need to complete big datasheet.
This comment was minimized by the moderator on the site
i need to copy from f18 to h19, then f21 to h22, and it goes on till 500 values and before the value in h column need to add text also

like f18 = 345

in h19 I should get = tdg 345

for 500 values in h column.

please help me someone
This comment was minimized by the moderator on the site
This macro sucks dont waste your time
This comment was minimized by the moderator on the site
For some reason this does not work if only one row is selected.
This comment was minimized by the moderator on the site
Excel 2010 - Select interval column command does not work. There is no any raction after clicking - ok
This comment was minimized by the moderator on the site
I always get an error: invalid procedure... How can I solve it. I want to select every 4th column in my dataset
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations