nisshaheen

السلام عليكم ورحمة الله وبركاته اخواني الافاضل في هذا الصرح العظيم اتمنى من حضراتكم مساعدتي في إنشاء كود يعمل على ترحيل بيانات نطاق محدد من جميع أوراق العمل إلى الصفحة الرئيسية (Main of Month) بحثت كثيرا قبل أن ألجأ لحضراتكم ولكن جميع الأكواد كانت لا تعمل جيدا كما ينبغي النطاق المطلوب (X4:Z16) حيث العمود (ْX) عبارة عم اسم قمت بكتابة معادلة تعمل على عدم تكرار الاسم أكثر من مرة في نفس ورقة العمل لكن عند محاولتي لعمل ذلك بالكود لم أنجح اريد أن لا يتكرر الاسم في الصفحة الرئيسية العمود (AA) أما العمود (Y) فهو عدد مرات تكرار الاسم لكل صفحة أريد أن تظهر النتيجة في العمود (AB) للصفحة الرئيسية حيث يعمل على جمع العمود (Y) لجميع الصفحات والعمود (Z) مجموع القيمة المستحقة لكل اسم وأريد أن تظهر النتيجة في العمود (AC) حيث يعمل الكود على جمع القيم الموجودة في هذا العمود ولجميع الصفحات سامحوني على الإطالة كما أسلفت بالشرح سابقا أغلب الأكواد عملت معي لكن ضمن النطاق المذكور يوجد صفوف فارغة لم يتم ملؤها بالبييانات على أن يتم ملؤها لاحقا ينسخ البيانات بما فيها الصفوف الفارغة وخارج نطاق التنفيذ أرفق الملف للتوضيح ملاحظة: ولتعم الفائدة وجدت كنز حقيقي كنت اضفت سؤال عن كيفية نسخ ملف يتضمن أكواد وكان ذلك صعبا جدا ولكن الحمد لله وفقني الله وبعد البحث الشاق في المواقع الأجنبية عملت على دمج مجموعة أكواد لينتج كود يعمل على حفظ الملف الحالي باسم يتم تحديد مكانه من قبل المستخدم وتسميته من داخل الكود باسم محدد بالإضافة إلى الشهر والسنة الحاليين متضمنا جميع الاكواد ولتعم الفائدة اتمنى من حضراتكم اما وضع الكود كمرجع او فصل هذه الملاحظة في موضوع جديد شاكرة فضلكم ‫semifinal‫‬.xlsm

للرفع

أخي الفاضل الأستاذ أحمد لقد وجدت الحل بعد البحث الطويل والكثير من الجهد والتعب لكن الأمر ليس بالهين كما أشرت حضرتك ولا يخلو الأمر من الصعاب والمشاكل وأنا الآن أواجه أهمها : لقد تم بفضل الله نسخ جميع الأكواد بما فيها الموجودة في (this workbook) لكن لم يأخذ نسخة من ملفي وتنسيقي بل قام بإنشاء ملف جديد فارع تماما وأعلم أن في الكود سطر يطلب إنشاء مصنف وليس نسخ من مصنف موجود حاولت في هذه النقطة لكن دون جدوى والآن أضع الملف والأكواد بين أيديكم لمساعدتي في حل المشكلة ولتعم الفائدة للجميع وهناك مشكلة أخرى قمت بعمل حساب عدد التبويبات الملونة لكل ورقة عمل على حسب اللون ونجحت والحمد لله بعمل العداد وإرجاع كل لون بجانب العدد وتنسيق شرطي وما المقصود من كل لون وتم التنفيذ بنجاح طبعا الكود أشرت فيه إلى الصفحة الرئيسية Main of Month تفاجأت أنه على حسب النطاق المشار إليه في الصفحة الرئيسية يكرر كود الألوان بالرغم أني حددت له النطاق ضمن الورقة المشار إليها أرجو الرد والتعديل على الكود لإنجاز المطلوب وشكرا ‫Accountent test date.xlsm

شكرا استاذ احمد لردك باذن الله لن يصعب الأمر عليكم عباقرة هذا المنتدى وسنحاول ان شاء الله إيجاد الحل

السلام عليكم أساتذي الكرام بفضل من الله وبالمثابرة توصلت إلى ملفي الذي كان لكم الفضل من بعد الله في نجاحه وخروجه بهذه الصورة ولا يخلو الامر من بعد النواقص كل ملف ينشئ صفحات تلقائية بتاريخ اليوم الحالي والشكر موصول للأستاذ Ali Mohamed Ali في مساعدتي بعمل الكود وتلوين تبويب الصفحات على حسب اختيار من القائمة المنسدلة وقمت بإنشاء كود ليتم ترحيل بيانات كل يوم إلى الصفحة الرئيسية (Main of Month) وعند الوصول إلى نهاية الشهر قمت بوضع دالة التاريخ الحالي وتم ربطها بكود مع اسم تبويب الصفحة وإذا وصلنا إلى نهاية الشهر لا يسمح لي بإضافة صفحات جديدة إلى ملف العمل ويبقوم بإنشاء ملف جديد باسم معين بالإضافة إلى الشهر الحالي وإلى هذا الحد يعمل بدون مشاكل والحمد لله. المشكلة الوحيدة هي الملف الجديد يأخذ كل بينانات وتنسيق الملف القديم ولكن للأسف بدون الماكرو الموجود في الملف القديم وهناك بعض المعادلات التي تم تعريفها مني أنا لم ينسخها ويظهر في مكانها #Name? قمت بالبحث ووجدت كود يعمل على نسخ جميع أكواد الماكرو الموجودة في ملف إلى ملف آخر وقمت ببعض التعديل عليه لكن واجهتني مشكلة عند تنفيذه بأنه لم يعمل على نسخ الماكرو. فلجأت من بعد الله إليكم بعد ما عجزت وشكرا ‫Accountent test date.xlsm

السلام عليكم ورحمة الله وبركاته بادئ ذي بدء أرجو التكرم من حضراتكم عدم دمج موضوعي هذا لموضوعي السابق شاكرة فضلكم الحمد لله بعد جهد ليس باليسير وجهود حضراتكم والبحث في المواقع العربية والأجنبية توصلت لما أريده مع عدم وجود أي خلية على استخدام الفيجوال لكن بالإصرار تحقق الهدف أضع بين يديكم عملي المتواضع قابلة للنصح والنقد والإرشاد لدي مشكلتين الأولى عند عملية نسخ البيانات للنطاق المحدد من آخر ورقة عمل تم إنشاؤها ولصقها في ورقة العمل الرئيسية (Main of Month) والنطاق وهو (B:F) أول صف في العمود B رقم (2) إلى آخر صف في العمود (F) ولصقه في العمود B بداية من الصف B3 إلى العمود F يتم تنفيذ المطلوب ولكن يبدأ النطاق من B إلى H ويمسح البيانات الموجودة في الصفحة الرئيسية ثم يتم لصق النطاق المحدد وهنا لم أعرف ما السبب المشكلة الثانية لا يتم تنفيذ جميع الماكرو عند فتح الملف بعضها لا يعمل إلا عند استدعاؤه مع العلم أني قمت بإنشاء ماكرو وسجلت باقي الماكرو به ليتم جلب جميع الماكرو عن طريقه سؤال أخير هل بالإمكان أخذ نسخة من المصنف لإنشاء مصنف جديد خاص بكل شهر أرجو الرد والتقييم وشكرا Accountent.xlsm

أخواني الأفاضل من لا يشكر الناس لا يشكر الله أضع بين أيديكم ملفي المتواضع بعد اتباع نصحكم وارشاداتكم والبعض القليل من مجهوداتي مع عدم علمي بأكواد فيجوال بيسك وللعلم يحتاج بعض التعديلات مثل الصفحة التي يتم إنشاؤها بتاريخ اليوم والتي تم نسخها من الصفحة السابقة تظهر باتجاه معاكس قمت بانشاء كود يتم تطبيقه على العمود G بناء على اختيار قيمة من القائمة المنسدلة لا يعمل إلى عند استدعاؤه بمفتاحي Alt+F8 برغم استعائي له تلقائيا والقائمة المنسدلة لا تظهر في الصفحة الجديدة أرجو من حضرتكم مساعدتي في هذه النقاط لأنه مطلوب غدا صباحا تسليمه شاكرة فضلكم test.xlsm

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

أستاذ علي الملف لم يعمل كما أريد المطلوب أن يأخذ البيانات من آخر صفحة تم إنشاؤها بتاريخ اليوم تلقائيا ووضعها في صفحة Main of june حسب الخلايا المحددة في الصفحة الرئيسيةللشهر هنا يأخذ نموذج الجدول فقط وآسفة لأنه غلط مني النطاق من A2:F500 بخصوص عمود (F) وضعت المرجع 500 لللإشارة وليس الحصر وشكرا لتعبك معي

استاذي الفاضل يعجز اللسان عن الشكر وجزاك الله كل الخير

أستاذنا الفاضل صباح الخير سامحني أكثرت عليك اريد ان يتم نسخ بيانات اخر ورقة وبنفس التنسيق إلى ورقة اليوم الحالي على ان يعمل على تفريغ الجدول من الخانة a3 إلى آخر خلية في العمود k فقط كما اود ان يقوم بترحيل بيانات كل الأوراق تلقائيا إلى الورقة الرئيسية main of june حسب الاعمدة الموجودة في ورقة كل يوم وشكرا

الشكر موصول لحضرتك وبارك الله فيك أستاذ علي

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

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

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