ناصرالمصرى

السلام عليكم ورحمته الله وبركاته ملف طيب وابن حلال لحقناه على أخر لحظة من الدور التاسع بس شكله كده مش ناوى يجبها على بر لانه بيفكر فى الانتحار بمجرد نسخة أو نقله أو حفظه بأسم فهل من سبيل للتخلص من هذا الملف نهائيا من على الحاسب حتى لايستطيع لغير المستخدم الاصلى العبث ببيانات هذا الملف فهل من كود يؤدى هذا الغرض شاكر فضل الجميع وجزاكم الله خيرا

السلام عليكم عمل رائع اخى ابو البراء والاروع ان تجعل مرفقاتك هنا دون الرجوع لروابط خارجية شاكر فضلك

للرفع رفع الله قدركم

السلام عليكم ورحمته الله وبركاته هل من الممكن إستبدال خاصية ال RightClick الى استخدام الاسهم لظهور قائمة الاسماء " السهم الى اسفل " بمعنى بمجرد النزول بالسهم لاسفل تظهر قائمة الاسماء برجاء الافادة من السادة الزملاء الافاضل تقبلوا جميعا وافر احترامى وتقديرى وجزاكم الله خيرا

أخى فى الله الاستاذ القدير / بن عليه حاجى وعليكم السلام ورحمته الله وبركاته سلمت من كل شر **** الامور تسرى كما أشرت سيادتكم واسمح لى بسؤال وملحوظة هذا بعد إذن حضرتك السؤال ماذا لو خصصنا خليه معينه لظهور القائمة بها وليكن الخلية B3 فما هو السطر المعنى بالتعديل وكيف يكون التعديل اما عن الملحوظة بالمرفق الاصلى الخاص بالقدير الاستاذ الفاضل أبو حنين فهو من اليسار الى اليمين وبالتالى تظهر القائمة من داخل الخلية المراد الاختيار فيها من خلال الليست بوكس أما إذا حولنا اتجاه الشيت من اليمين الى اليسار وهو المطلوب فالقائمة هنا تكون بعيده عن الخلية المراد الاختيار فيها فهل من سبيل لحل هذه الجزئية اعتذر لكثرة الاسئلة تقبل وافر تقديرى واحترامى وجزاكم الله خيرا

الاستاذ القدير / بن عليه حاجى السلام عليكم ورحمته الله وبركاته أدام الله عليك الصحة والعافية وبارك فى عمرك وجزاك الله تعالى عنى خير الجزاء بخصوص تخصيص شيت 3 وخلايا العمود J فهما تمام التمام أما بخصوص خاصية RightClick فهناك مشكلة فى إظهار القائمة الا من خلال الدخول على محرر الاكواد ومن ثم تنفيذ الكود كل مرة فهل من سبيل أخى الفاضل لتخطى هذة الجزئية تقبل وافر تقديرى واحترامى وجزاكم الله خيرا

السلام عليكم ورحمته الله وبركاته المرفق التالى من ابداعات الاستاذ القدير/ ابو حنين " حفظه الله " وبالمرفق التالى بعض التساؤلات نحو تعديله إن لم يكن هناك إتاحة لتعديله نرجو من حضراتكم توجيهى نحو حلا أخر قريب من فكرة هذا المرفق وهو فى حد ذاته علاجا لمشكلة البطىء فى الكتابة من على لوحة المفاتيح وخاصة فى حالات تسجيل البيانات المتكررة شاكر فضل حضراتكم وجزاكم الله خيرا التكملة التلقائية للقدير ابو حنين.xlsb.rar

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

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

احلى صباح ياأبو العربى أشتقت اليك أخى الحبيب وأكيد الكتالوج وحشك معلشى انا بتعلم شاهد هذا الكود " معاينه مع الطباعة " هل هذا الكود يعمل على جميع الصفحات المحددة دون غيرها أم هناك تعديلا أخر Sub ãÚÇíäÉ_ãÚ_ÇáØÈÇÚÉ() ActiveWindow.SelectedSheets.PrintPreview A = MsgBox("هل تود الطباعة بعد المعاينه", vbYesNo + vbQuestion, "طبعا أكيد هطبع ولا هو لعب عيال") If A = vbYes Then With ActiveSheet .PrintOut End With End If Range("A1").Activate End Sub وافر تقديرى واحترامى

للرفع

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

السلام عليكم ورحمته الله وبركاته شكرا جزيلا لجميع السادة المشاركين سؤال للتعلم ماذا يعنى هذا الجزء من السطر Field:=5, Criteria1:="<" & 60 ومرة يكون هكذا وماالفرق بين الرقمى 5 و 3 وهل لهما علاقة بعدد صفوف الفلترة؟؟؟ Field:=3, Criteria1:="<>" & "" وجزاكم الله خيرا

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

اخى فى الله الاستاذ / احمد الفلاحجى السلام عليكم لدىّ مشكلة فى رفع الملفات وأيضا فى إنشاء موضوع جديد حيث اخذ الموضوع وقتا لرفعه ربما توجد مشكلة فى السيرفر الموضوع انه لدىّ ملف به كود ترحيل قيم من العمود A بشيت 1 الى العمود A بشيت 2 اريد هنا كلما تم ادخال قيم جديدة ومن ثم ترحيلها يتم تجمبعها تلقائبا بالعمود B بشيت 2 حيث يتم العمل بالنطاق من A1 الى B1000 " اخر صف به بيانات " شاكر فضلك وجزاكم الله خيرا

السلام عليكم ورحمته الله وبركاته وطابت اوقاتكم بكل خير أينما كنتم الرابط التالى كيف يمكن لنا تجميع القيم مع كل ادخال جديد فى نفس الخلية ولكن لآخر صف يحتوى على بيانات **** شاكر فضلكم وجزاكم الله خيرا

عليك نور ياابو نصار

اخى الفاضل ابو نصار السلام عليكم عذرا اخى للتأخير فى الرد لظروف طارئة اشكركم اخى جارى الاضافة وسأخبركم فى حينه شاكر فضلك وبارك الله فيكم

للرفع

للرفع

السلام عليكم ورحمته الله وبركاته بالمرفق التالى ورقة عمل جاهزة للطباعة من 4 صفحات يتخلل هذة الصفحات 5 صفوف تحتوى على تذيل الجدوال استخدمت الكود التالى لحذف النطاق من C8 الى X27 مع حذف اول صف به بيانات بداية من الصف A29 وحتى اخرصف به بيانات الاضافة المطلوبه هى حذف باقى الصفحات بدون فواصل للطباعة والابقاء على الصفحة الاولى فقط شاكر فضل الجميع **** تقبلوا وافر احترامى وتقديرى حذف فواصل طباعة الصفحات.rar

اخى ابوالبراء السلام عليكم ورحمته الله وبركاته هناك مشكلة بسيطة بخصوص الكود الموضح بالمشاركة رقم 17 لم انتبه اليها الا بعد الانتهاء الكامل من تجربة البرنامج الا وهى نسخ التنسيقات من المفترض هنا ان يتم النسخ بداية من العمود B وليس العمود A على اعتبار ان الارقام التى ستسجل بالعمودA بالشيت رقم 2 سيتم تسجيلها يدويا حاولت التعديل دون جدوى أرجو التفضل بتصويب تلك الجزئية شاكر فضلك **** تقبل وافراحترامى وتقديرى

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

فى انتظارعودة الاخوة الاجلاء

بسم الله الرحمن الرحيم اخى ياسر العربى اخى ياسر خليل السلام عليكم ورحمته الله وبركاته أشكركم جزيل الشكرعما قدمتموه لى فى هذا الموضوع بالنسبة للكودين فكلاهما يعمل بشكل صحيح ولكنى وبعد إذن أخى ياسرالعربى بأننى اضفت الكود الخاص بأخى ابو البراء لاننى وبصراحة هذا ماكنت اتمناه من بداية الموضوع الذى أستغرق وقتا طويلا ولكنى استفدت من جميع الحلول المقدمة من إخوانى الافاضل الاساتذه احمد زمان *** ابو خليل *** ابو نصار *** سعيد بيرم والحمد لله الذى بنعمته تتم الصالحات والحمد لله تعالى الذى أنعم علىّ بأخوة جديرون بالثقة والفخروالاحترام ملحوظة أخيرة بعد إذن حضراتكم وتتمثل فى أخرعصفور بالرغم اننى قمت بترتيب المصنف كما ينبغى وبالرغم من أن لوحة المفاتيح على اتجاه اللغة الانجليزية إلا انه لايتم تفعيل الماكروالخاص بإستدعاء اوامر الــ call all من خلال الضغط على Ctrl+Q اما عن أخرعصفور فهو يرجى تفعيل الكود الخاص بأخى الاستاذ الفاضل/ ابو نصار Ali_A بمجرد الضغط على " OK " برسالة انهاء نقل البيانات بهذا الجزء من الكود " StopTimer "بالموديول رقم 3 MsgBox "Transferring Data Will Be Turned Off" هذا وبالله التوفيق شكرا شكرا شكرا وجزاكم الله خيرا وبارك فيكم جميعا تقلبوا وافراحترامى وتقديرى استدعاء بيانات 2015.xlsb.rar