logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
abdelmoniem ismail لا تميز خلال هذه الفترة-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة توزيع المعلمين في جدول الحصص حسب النصاب بشروط اكسيل مشاريع جاهزه



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





06-11-2017 09:36 مساءً
بسم الله الرحمن الرحيم
جزاكم الله خيرا لكل ماتقدمونه من أعمال تقربا لله
المطلوب : كود يظهر اعمده متجاوره او اعمده غير متجاوره في الصفحه
وبارك الله لكم




look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
  06-11-2017 09:38 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس :
تاريخ الميلاد : 2-2-1990
قوة السمعة : 657
الاعجاب : 0
الحل من الاستاذ المحترم ياسر العربي
CODE

<div>Sub yasser3()</div>

<div>Columns(&quot;D:XFD&quot;).EntireColumn.Hidden = True</div>

<div>Range(&quot;K:L,O:P,S:T,Z:Z&quot;).EntireColumn.Hidden = False</div>

<div>End Sub</div>




look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
  06-11-2017 09:39 مساءً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس :
تاريخ الميلاد : 2-2-1990
قوة السمعة : 657
الاعجاب : 0
لاثراء الموضوع حل من الاستاذ سليم حاصبيا
CODE

<div>
<div>
<div>
<div>Sub hide_some_columns()</div>

<div>Sheets(&quot;sheet1&quot;).Columns.Hidden = True</div>

<div>Range(&quot;b1,c1,d1,r1&quot;).EntireColumn.Hidden = False</div>

<div>Range(&quot;b1&quot;).Select</div>

<div>End Sub</div>
</div>
</div>
</div>




look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
  06-11-2017 09:47 مساءً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس :
تاريخ الميلاد : 2-2-1990
قوة السمعة : 657
الاعجاب : 0
نرجو ان يعمل الكود من صفحه اخرى وليس في نفس الصفحه
الحل من المحترم ياسر العربي
الموضوع بسيط اخي الكريم
ضع اسم الشيت قبل اسطرالكود وتتعامل معه من اي مكان في الملف
كما بالكود التالي
CODE

Sub yasser3()
    Sheets("sheet1").Columns("B:XFD").EntireColumn.Hidden = True
    Sheets("sheet1").Range("a:v").EntireColumn.Hidden = False
End Sub

===
لاثراء الموضوع والحل من الاستاذ المحترم سليم حاصبيا
CODE

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

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




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




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




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




look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
  19-11-2017 05:39 صباحاً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 23-09-2017
رقم العضوية : 627
المشاركات : 259
الدولة : مصر
الجنس :
تاريخ الميلاد : 14-2-1980
قوة السمعة : 2169
الاعجاب : 1
موقعي : زيارة موقعي
المشاركة الأصلية كتبت بواسطة: malik ماذ لوعملنا بشرط اختيار احد اسماء مثلا الاول يظهراعمدة وثاني لايظهر اعمدة
بإخفاء واظهار اعمدة من صفحة
أخى الكريم قم بالإطلاع على الموضوع و الملف المرفق
تحت هذا الرابط

http://techno7asry.com/forum/t509




look/images/icons/i1.gif كود لاظهار اعمده مختلفه او متجاوره
  21-11-2017 10:01 صباحاً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-11-2017
رقم العضوية : 1785
المشاركات : 185
الجنس :
تاريخ الميلاد : 20-8-1989
قوة السمعة : 244
الاعجاب : 0

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





اضافة رد جديد اضافة موضوع جديد




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









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

الساعة الآن 04:52 PM