أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
هانى على ali mohamed ali-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة منع ادخال البيانات بعدة شروط اكسيل اسئله واجابات


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





كود لاظهار اعمده مختلفه او متجاوره

بسم الله الرحمن الرحيم جزاكم الله خيرا لكل ماتقدمونه من أعمال تقربا لله المطلوب : كود يظهر اعمده متجاوره او اعمده غير مت ..



06-11-2017 09:36 مساء
ناصر سعيد1
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 657
 offline 

بسم الله الرحمن الرحيم
جزاكم الله خيرا لكل ماتقدمونه من أعمال تقربا لله
المطلوب : كود يظهر اعمده متجاوره او اعمده غير متجاوره في الصفحه
وبارك الله لكم

06-11-2017 09:38 مساء
مشاهدة مشاركة منفردة [1]
ناصر سعيد1
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 657
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
الحل من الاستاذ المحترم ياسر العربي
Sub yasser3()
Columns("D:XFD").EntireColumn.Hidden = True
Range("K:L,O:P,S:T,Z:Z").EntireColumn.Hidden = False
End Sub

06-11-2017 09:39 مساء
مشاهدة مشاركة منفردة [2]
ناصر سعيد1
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 657
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
لاثراء الموضوع حل من الاستاذ سليم حاصبيا
Sub hide_some_columns()
Sheets("sheet1").Columns.Hidden = True
Range("b1,c1,d1,r1").EntireColumn.Hidden = False
Range("b1").Select
End Sub

06-11-2017 09:47 مساء
مشاهدة مشاركة منفردة [3]
ناصر سعيد1
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 657
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
نرجو ان يعمل الكود من صفحه اخرى وليس في نفس الصفحه
الحل من المحترم ياسر العربي
الموضوع بسيط اخي الكريم
ضع اسم الشيت قبل اسطرالكود وتتعامل معه من اي مكان في الملف
كما بالكود التالي
Sub yasser3()
    Sheets("sheet1").Columns("B:XFD").EntireColumn.Hidden = True
    Sheets("sheet1").Range("a:v").EntireColumn.Hidden = False
End Sub

===
لاثراء الموضوع  والحل من الاستاذ المحترم سليم حاصبيا
Sub hide_some_columns()
With Sheets("sheet1")
    .Columns.Hidden = True
    .Range("a1,b1,c1,g1").EntireColumn.Hidden = False
     Application.Goto Reference:=.Range("b1")
End With
Sheets("sheet1").Activate
End Sub

==
الحل من الاستاذ المحترم ياسر خليل
إثراءً للموضوع .. أقدم لكم هذا الملف لعله يفي بالغرض وينهي هذا الموضوع بشكل أكثر مرونة

06-11-2017 10:57 مساء
مشاهدة مشاركة منفردة [4]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10444
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 535
قوة السمعة : 36522
عدد الإجابات: 254
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
بارك الله فيك أخي العزيز ناصر وجزاك الله خيراً

18-11-2017 10:22 مساء
مشاهدة مشاركة منفردة [5]
malik
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 857
المشاركات : 286
الجنس : ذكر
تاريخ الميلاد : 4-7-1985
الدعوات : 6
يتابعهم : 14
يتابعونه : 5
قوة السمعة : 311
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
ماذ لوعملنا بشرط اختيار احد اسماء مثلا الاول يظهراعمدة وثاني لايظهر اعمدة
 بإخفاء واظهار اعمدة من صفحة 

18-11-2017 10:39 مساء
مشاهدة مشاركة منفردة [6]
malik
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 857
المشاركات : 286
الجنس : ذكر
تاريخ الميلاد : 4-7-1985
الدعوات : 6
يتابعهم : 14
يتابعونه : 5
قوة السمعة : 311
 offline 
look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
ماذ لوعملنا بشرط اختيار احد اسماء مثلا الاول يظهراعمدة وثاني لايظهر اعمدة
 بإخفاء واظهار اعمدة من صفحة 




الكلمات الدلالية
لاظهار ، اعمده ، مختلفه ، متجاوره ،


 










اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 04:35 مساء