روان احمد قام بنشر يوليو 17, 2021 مشاركة قام بنشر يوليو 17, 2021 السلام عليكم ورحمة الله الاساتذه الافاضل برجاء المساعد محتاج فى المرفق اول ما ادخل كود الموظف يتم ادراج تاريخ الشهر كامل مثال بما ان شهر 7 عدد ايام 31 يوم 1-7-2021 2-7-2021 3-7-2021 31-7-2021 الخ ويتم ادراج المسلسل حسب ايام الشهر مثال 1 2 3 4 31 الموظفين.xlsx رابط هذا التعليق شارك More sharing options...
أفضل إجابة أ / محمد صالح قام بنشر يوليو 17, 2021 أفضل إجابة مشاركة قام بنشر يوليو 17, 2021 يمكنك استعمال هذا الإجراء التنفيذ بعد تحديد الخلية المكتوب فيها كود الموظف Sub masFillDays() month_days = Day(DateSerial(Year([d1]), Month([d1]) + 1, 1) - 1) For n = 1 To month_days ActiveCell.Offset(n - 1, -1).Value = n ActiveCell.Offset(n - 1, 0).Value = ActiveCell.Value ActiveCell.Offset(n - 1, 6).Value = DateSerial(Year([d1]), Month([d1]), n) Next n MsgBox "done" End Sub ولا تنس تغيير امتداد الملف لصيغة تدعم الماكرة مثل xlsb بالتوفيق رابط هذا التعليق شارك More sharing options...
روان احمد قام بنشر يوليو 17, 2021 الكاتب مشاركة قام بنشر يوليو 17, 2021 (معدل) اشكرك علي دعمك استاذ محمد بارك الله فيك بس اسمحلى اقدر انفذ الخطوه دي ازاي التنفيذ بعد تحديد الخلية المكتوب فيها كود الموظف انا نقلت الكود ولكنه لا يعمل عند كتابة =n(الكود) يكون الناتج رقم الكودنفسه والمطلوب عند كتابه الكود يتم ادراج تواريخ الشهر كامل بناءا على التاريخ المدرج بالخليه D1 مع ادارج المسلسل بشكل تلاقائى مع عدد ايام الشهر هستسمحك اخي الكريم مرفق ملف الاكسيل لو تشوفه اكون شاكر لحضرتك تم تعديل يوليو 17, 2021 بواسطه روان احمد رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر يوليو 17, 2021 مشاركة قام بنشر يوليو 17, 2021 بعد لصق الكود في موديول جديد يمكن مسح جميع المكتوب في الشيت أولا في الخلية مثلا B3 نكتب 100 (كود الموظف) ثم نضغط ctrl+enter ليبقى في نفس الخلية بعد قبول الكتابة (بكدا حددنا الخلية المكتوب فيها كود الموظف نبدأ في تنفيذ الماكرو) ثم نضغط على alt+f8 لعرض الماكرو ونختار masFillDays ونضغط run (أو يمكنك ربط الكود بزر أو شكل ويتم تنفيذ الماكرو بعد الضغط على الزر مباشرة) سيتم عمل مسلسل من 1 إلى 31 وتكرار كتابة كود الموظف 31 مرة تم تعديل الكود السابق ليتم كتابة تاريخ اليوم من 1 في الشهر المكتوب في الخلية d1 إلى نهاية الشهر في عمود التاريخ أليس هذا هو المطلوب ؟؟ رابط هذا التعليق شارك More sharing options...
روان احمد قام بنشر يوليو 17, 2021 الكاتب مشاركة قام بنشر يوليو 17, 2021 اشكرك على مجهودك الرائع التسلسل الرقمى ضبظ جدا معايا ولكن التاريخ لم يتم ادراجه 1 رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر يوليو 17, 2021 مشاركة قام بنشر يوليو 17, 2021 1 ساعه مضت, أ / محمد صالح said: تم تعديل الكود السابق ليتم كتابة تاريخ اليوم من 1 في الشهر المكتوب في الخلية d1 إلى نهاية الشهر في عمود التاريخ يبدو أن حضرتك ما انتبهت لهذا السطر رابط هذا التعليق شارك More sharing options...
روان احمد قام بنشر يوليو 17, 2021 الكاتب مشاركة قام بنشر يوليو 17, 2021 اشكرك ولكن تعديل الكود مش عندي ممكن حضرتك تفيدنى وترسل الكود بعد التعديل رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر يوليو 17, 2021 مشاركة قام بنشر يوليو 17, 2021 الكود تم تعديله في المشاركة الأصلية هذه رابط هذا التعليق شارك More sharing options...
روان احمد قام بنشر يوليو 18, 2021 الكاتب مشاركة قام بنشر يوليو 18, 2021 اخى الكريم اشكرك على مجهودك الرائع تم عمل الكود بنجاح باهر اشكرك وربنا يجعله فى ميزان حسناتك 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.