أبو أنس80 قام بنشر يوليو 22, 2013 قام بنشر يوليو 22, 2013 بسم الله الرحمن الرحين صباح الخير يا اهل الخير انا اريد فكرة او طريقة او كود لتحديد عدد صفوف في شيت واحد مثلا اريد 300 صفوف و عدم امكانية اضافة صف اخر اشكركم جميعا 2
حمادة عمر قام بنشر يوليو 22, 2013 قام بنشر يوليو 22, 2013 الاخ الكريم / shakhawan بارك الله فيك علي حسب فهمي للطلب و ع السريع اليك هذا الكود البسيط ارجو ان اكون قد فهمت الطلب كما تريد .... معلهش صايمين بقا ... هههه رمضان كريم Private Sub Worksheet_Activate() Application.ScreenUpdating = False Rows("301:301").Select Range(Selection, Selection.End(xlDown)).Select Selection.Delete Shift:=xlUp Selection.EntireRow.Hidden = True Application.ScreenUpdating = True End Sub جزاك الله خيرا تحديد عدد الصفوف في شيت معين.rar 1
على حسن قام بنشر يوليو 22, 2013 قام بنشر يوليو 22, 2013 (معدل) كود رائع لكن المطلوب كود يحدد عد الاعمده ايضاً تم تعديل يوليو 22, 2013 بواسطه على حسن
أبو أنس80 قام بنشر يوليو 23, 2013 الكاتب قام بنشر يوليو 23, 2013 جزاك الله خيرا يا استاذي حمادة عمر همشي ابوي اسمها عمر يعني بمعنى اخر انت اخوي اريد واحد منكم تصيح غلط املائيبسم الله الرحمن الرحين اشكرك حبيبي فكرة كود جميل جدا اعتذر بسبب لغتي عربية الله طول عمرك
أبو أنس80 قام بنشر يوليو 23, 2013 الكاتب قام بنشر يوليو 23, 2013 حبيبي على حسن بالنسبة لعمود كود غير ضروري ممكن تحديد مجموعة صف بعد ذلك تخفيها
حمادة عمر قام بنشر يوليو 23, 2013 قام بنشر يوليو 23, 2013 كود رائع لكن المطلوب كود يحدد عد الاعمده ايضاً الاخ الكريم / علي حسن بالنسبة لطلبك سيكون باستخدام نفس الكود تقريبا ولكن بخصوص الاعمدة ليكون الكود بالشكل التالي Private Sub Worksheet_Activate() Application.ScreenUpdating = False Columns("J:J").Select Range(Selection, Selection.End(xlToRight)).Select Selection.EntireColumn.Hidden = True Application.ScreenUpdating = True End Sub ويتم تحديد العمود المطلوب الاخفاء او الحذف من بعده من هذا السطر Columns("J:J").Select ارجو ان يكون هو المطلوب جزاك الله خيرا 1
حمادة عمر قام بنشر يوليو 23, 2013 قام بنشر يوليو 23, 2013 جزاك الله خيرا يا استاذي حمادة عمر همشي ابوي اسمها عمر يعني بمعنى اخر انت اخوي اريد واحد منكم تصيح غلط املائيبسم الله الرحمن الرحين اشكرك حبيبي فكرة كود جميل جدا اعتذر بسبب لغتي عربية الله طول عمرك السلام عليكم الاخ الكريم / shakhawan يمكنك انت بنفسك تعديل ذلك من خلال زر تعديل اسفل المشاركة نفسها الموجود بها الخطأ وان لم يمكنك ذلك يمكنك مخاطبة احد مشرفين الموقع جزاك الله خيرا
حمادة عمر قام بنشر يوليو 23, 2013 قام بنشر يوليو 23, 2013 ويمكن ايضا الجمع بين الكودين لاخفاء مجموعة من الصفوف ابتداءا من صف معين واخفاء مجموعة من الاعمدة ابتداءا من عمود معين في ورقة معينة ليكون الكود كما يلي Private Sub Worksheet_Activate() Application.ScreenUpdating = False Rows("301:301").Select Range(Selection, Selection.End(xlDown)).Select Selection.Delete Shift:=xlUp Selection.EntireRow.Hidden = True Columns("J:J").Select Range(Selection, Selection.End(xlToRight)).Select Selection.EntireColumn.Hidden = True Application.ScreenUpdating = True End Sub 2
محمد ابو البـراء قام بنشر يوليو 23, 2013 قام بنشر يوليو 23, 2013 مبدع / استاذ حمادة عمر جزاكم الله خيرا
حمادة عمر قام بنشر يوليو 23, 2013 قام بنشر يوليو 23, 2013 السلام عليكم الأخ الكريم / محمد بارك الله فيك مرور طيب وكريم من أخ كريم جزاك الله خيرا رمضان كريم
محمد ابو البـراء قام بنشر يوليو 24, 2013 قام بنشر يوليو 24, 2013 استاذى الخلوق / استاذ حمادة عمر وعليكم السلام وجزاكم الله خيرا على كلامك الراقي لي طلب بسيط في نفس الموضوع وهي احياناً نجد خلفية زرقاء مموهة وفي الشيت عدد محدود من الاعمدة والصفوف كيف ذلك ؟
حمادة عمر قام بنشر يوليو 24, 2013 قام بنشر يوليو 24, 2013 الاخ الكريم / محمد تقبل تحياتي ومعذرة لم افهم المقصود من السؤال ... صايمين بقا ... ههههه برجاء لو ارفاق الملف الذي تقصده وموجود به هذه الخلفية التي تقصدها جزاك الله خيرا
محمد ابو البـراء قام بنشر يوليو 24, 2013 قام بنشر يوليو 24, 2013 (معدل) استاذى الخلوق / استاذ حمادة عمر تقبل الله منكم وسوف ابحث في ذاكراتي على الملف المطلوب واتمنى ان لا تحرج لي ذاكرتي اكل بدل الملف بسبب الصيام ( ابتسامة ) تم تعديل يوليو 24, 2013 بواسطه محمد ابو البـراء
أبو أنس80 قام بنشر يوليو 29, 2013 الكاتب قام بنشر يوليو 29, 2013 بارك الله فیك اقبل تحاتی و احتراماتی
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.