عبد الله بولنوار قام بنشر يناير 6, 2015 قام بنشر يناير 6, 2015 اي ملف تقصد الذي اقتبسته ( شرح الفيديو ) ام طلبك الاول
احمد فضيله قام بنشر يناير 6, 2015 قام بنشر يناير 6, 2015 السلام عليكم و رحمة الله و بركاته بعد اذن كل الاخوه يمكن متابعة الموضوع على الرابط التالي : http://www.officena.net/ib/?showtopic=37604 و الله المستعان
الأمير هشام قام بنشر يناير 7, 2015 الكاتب قام بنشر يناير 7, 2015 اي ملف تقصد الذي اقتبسته ( شرح الفيديو ) ام طلبك الاول الأستاذ الفاضل / عبد الله الحقيقة أنى أدرك أننى قد أثقلت على حضرتك و لكن كريم مودتك و فيض علمك يشجعنى على سؤال سيادتكم أولاً : الرابط http://www.gulfup.com/?jc2GSY و الخاص بالشرح لا يكتمل فيه التحميل (المثل الصينى يقول لا تعطنى سمكه و لكن علمنى كيف أصطاد ) ثانياً : أرجو تطوير الكود بحيث عند فتح الملف لا تظهر أى بيانات ثالثاً : ما معنى الكود ActiveWindow.ScrollRow = 12 الموجود فى داله البحث و لماذا 12 بالذات و ما معنى الكود (MyRng = Range("schedule").Columns(8 رابعاً : عند كتابة الرقم الوظيفى 0 (عند محاولة إختبار الكود ) يظهر عمود الرقم الوظيفى فارغ مع وافر الشكر و التقدير
عبد الله بولنوار قام بنشر يناير 7, 2015 قام بنشر يناير 7, 2015 (معدل) اي ملف تقصد الذي اقتبسته ( شرح الفيديو ) ام طلبك الاول الأستاذ الفاضل / عبد الله الحقيقة أنى أدرك أننى قد أثقلت على حضرتك و لكن كريم مودتك و فيض علمك يشجعنى على سؤال سيادتكم أولاً : الرابط http://www.gulfup.com/?jc2GSY و الخاص بالشرح لا يكتمل فيه التحميل (المثل الصينى يقول لا تعطنى سمكه و لكن علمنى كيف أصطاد ) ثانياً : أرجو تطوير الكود بحيث عند فتح الملف لا تظهر أى بيانات ثالثاً : ما معنى الكود ActiveWindow.ScrollRow = 12 الموجود فى داله البحث و لماذا 12 بالذات و ما معنى الكود (MyRng = Range("schedule").Columns(8 رابعاً : عند كتابة الرقم الوظيفى 0 (عند محاولة إختبار الكود ) يظهر عمود الرقم الوظيفى فارغ مع وافر الشكر و التقدير للاسف الرابط لسمكة اخرى غير السمكة الي تريد اصديادها لانه شرح آخر للاخ الجموعي في امر آخر الابط يعمل عادي الن موقع الرفع الخليجية معطل لاعيد تحميله لك من جديد بخصوص الاكواد سالفة الذكر عملها الأخ الي قبلي في الفلترة انا عملك كود طريقة البحث فقط طبعا عند وضع الرقم 0 يظهر العمود فارغ لانه يوجد بيانات لا يوجد بها رقم وظيفي الكود (MyRng = Range("schedule").Columns(8 الأخ قام بتسمية مساحة البحث باسم schedule لعمل الفرز عليها و الرقم 8 هو ترتيب العمود الخاص بالرقم الوظيفي الذي سيتم الفرز على اساسه تم تعديل يناير 7, 2015 بواسطه عبد الله بولنوار
عبد الله بولنوار قام بنشر يناير 7, 2015 قام بنشر يناير 7, 2015 باخفاء كل البيانات invigilations99.rar 1
الجموعي قام بنشر يناير 7, 2015 قام بنشر يناير 7, 2015 باخفاء كل البيانات بارك الله فيك أستاذي والله أتحفتنا به هذه الأكواد الرائعة ActiveSheet.Unprotect ([j1]) Rows("6:5001").Select Selection.EntireRow.Hidden = True ActiveSheet.Protect ([j1]) انت وضعته في حدث فتح الورك بوك لحماية الشيت وإخفاء المحددة ولماذا وضعته ايضا في زر البحث وضعته ايضا في الموديول 4 Sub hide()
عبد الله بولنوار قام بنشر يناير 8, 2015 قام بنشر يناير 8, 2015 باخفاء كل البيانات بارك الله فيك أستاذي والله أتحفتنا به هذه الأكواد الرائعة ActiveSheet.Unprotect ([j1]) Rows("6:5001").Select Selection.EntireRow.Hidden = True ActiveSheet.Protect ([j1]) انت وضعته في حدث فتح الورك بوك لحماية الشيت وإخفاء المحددة ولماذا وضعته ايضا في زر البحث وضعته ايضا في الموديول 4 Sub hide() اهلا بيك في الموديل نسيت حذفه فقط لاني سجلت الموديل ثم عدلت عليه لفك الحماية ثم ارجاع الحماية ( اسهل من كتابته حرفيا ) في زر البحث لكي يخفي عملية البحث السابقة فقط سواء اراد البحث عن جديد او مجرد مسح البحث السابق دمت بود
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.