اخفاء اعمدة متفرقة بالماكرو

[خالد الشاعر]

السادة الخبراء

اريد اخفاء اعمدة متفرقة دفعة واحدة

و استخدمات هذا الكود لكنة لا يعمل

Columns("F:K,N:S,V:AA,AD:AI,AL:AQ").Select

Selection.EntireColumn.Hidden = True

[b14].Select

برجاء الافادة من السادة الخبراء

ولكم جزيل الشكر

[عبد الفتاح كيرة]

استخدم هذا الكود

Range("f:k ,n:s,v:aa,ad:ai,al:aq").EntireColumn.Hidden = True

[خالد الشاعر]

اشكرك استاذ Kemas

تسلم ايدك

و سوال تانى لو بدل العمود صف تكون

EntireRow.Hidden = True

ولك جزيل الشكر

جزاك الله خيراً

[عبد الفتاح كيرة]

كهذا

Range("6:11 ,15:17,20:25,30:33,37:41").EntireRow.Hidden = True

[خالد الشاعر]

الف شكر استاذ كيماس

جزاك الله خيراً