mhareek قام بنشر يوليو 20, 2008 مشاركة قام بنشر يوليو 20, 2008 هل من الممكن استخدام نفس الز لاظهار بينات معينة واستخدام نفس الظر لاخفاءها مرة اخرى رابط هذا التعليق شارك More sharing options...
هادى محمد المامون سالم قام بنشر يوليو 20, 2008 مشاركة قام بنشر يوليو 20, 2008 هل من الممكن استخدام نفس الز لاظهار بينات معينة واستخدام نفس الظر لاخفاءها مرة اخرى بسم الله الرحمن الرحيم يمكتك بأستخدام داله IF مرفق ملف كنموذج السلام عليكم Hide.rar رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يوليو 20, 2008 مشاركة قام بنشر يوليو 20, 2008 شكرا للاستاذ هادي كيف يمكن اخفاء اعمدة مختلفة معينة واظهارها ؟ الزر لايقبل الضغط عليه يمين كيف تم ذلك وكيفية قبول الزر الضغط عليه يمينا ؟ وشكرا رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يوليو 20, 2008 مشاركة قام بنشر يوليو 20, 2008 السلام عليكم الاخ الفاضل /قصى وبعد اذن استاذنا / هادى سالم سؤالك هذا اتعبنى كثيرا فمنذ فترة سالت نفسى نفس السؤال ووجد الحل فوجب على قوله انظر رايت كليك لاختيار لاظهار شريط الادوات اختر مربع ادوات التحكم - سيظهر لك شريط اضغط على اول زر فيه وهو وضع التصميم الان اصبح الزر ملك يديك افعل كما شئت وعلى حد علمى فهو يسمى سكربت والله اعلم وهناك العديد من الاوامر الجميلة التى ينفذها هذا الزر فعندى منها عدد قليل اذا اردتها واذا كان احد يمتلك من هذه الاوامر المزيد ياريت تزويدنا بها هشام رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يوليو 21, 2008 مشاركة قام بنشر يوليو 21, 2008 شكرا للاخ هشام العديد من الاوامر الجميلة التى ينفذها هذا الزر نريدها يا اخي الفاضل كيف يمكن اخفاء اعمدة مختلفة معينة واظهارها ؟ ومازال السؤال مطروحا رابط هذا التعليق شارك More sharing options...
ابو اسامة العينبوسي قام بنشر يوليو 21, 2008 مشاركة قام بنشر يوليو 21, 2008 (معدل) السلام عليكم اليك حل اخفاء العمود A و هو نفس طريقة عمل الاخ هادى سالم Private Sub CommandButton2_Click() If CommandButton2.Caption = "ÃÎÝÇÁ ÇáÚãæÏ A" Then Columns("A").Hidden = True CommandButton2.Caption = "ÃÙåÇÑ ÇáÚãæÏ A" Else Columns("A").Hidden = False CommandButton2.Caption = "ÃÎÝÇÁ ÇáÚãæÏ A" End If End Sub الرجاء زياره هذا الرابط http://www.officena.net/ib/index.php?showtopic=24793 Show_Hid.rar Hide.rar تم تعديل يوليو 21, 2008 بواسطه ابو اسامة العينبوسي رابط هذا التعليق شارك More sharing options...
ابو اسامة العينبوسي قام بنشر يوليو 21, 2008 مشاركة قام بنشر يوليو 21, 2008 السلام عليكم الحروف العربيه في الكود اعلاه تظهر على شكل رموز عند ادراجها في صفحه المنتدى لا اعلم السبب رابط هذا التعليق شارك More sharing options...
mhareek قام بنشر يوليو 21, 2008 الكاتب مشاركة قام بنشر يوليو 21, 2008 (معدل) الف شكر اخى اسامة على سرعة الرد جزاك الله خيرا والف شكر لاخوانى الذين تفاعلوا مع المشاركة الف الف شكر تم تعديل يوليو 21, 2008 بواسطه mhareek رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يوليو 21, 2008 مشاركة قام بنشر يوليو 21, 2008 اشكرك اشكرك وادعو الله ان يوفقك ويلهمك الصواب اخي الفاضل الاعمدة التي اريد اخفاءها E & G & C وفي نفس وقت اخفائهم يظهر عمود F & A & D رابط هذا التعليق شارك More sharing options...
ابو اسامة العينبوسي قام بنشر يوليو 21, 2008 مشاركة قام بنشر يوليو 21, 2008 Private Sub CommandButton2_Click() Range("A:A,F:F,D:D").Select Selection.EntireColumn.Hidden = False If CommandButton2.Caption = "أخفاء الاعمدة A&f&d" Then Range("E:E,G:G,C:C").Select Selection.EntireColumn.Hidden = True CommandButton2.Caption = "أظهار الاعمدة E&G&C" Else Range("E:E,G:G,C:C").Select Selection.EntireColumn.Hidden = False Range("A:A,F:F,D:D").Select Selection.EntireColumn.Hidden = True CommandButton2.Caption = "أخفاء الاعمدة A&f&d" End If End Sub رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان