عبدالله المجرب

شكراً على المعلومة المفيدة وان شاء الله ان كان لديك النية لتقديم معلومات بهذه الطريقة ان تضعها في موضوع واحد (اجعل هذا الموضوع هو الاساس) لتعم الفائدة وسيتم تغيير عنوان الموضوع ان اردت

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

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

السلام عليكم ضع هذا الكود في حدث ورقة العمل Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [F7:F1000]) Is Nothing Then For i = 2 To 6 Target.Offset(0, i).FormulaR1C1 = Cells(4, Target.Offset(0, i).Column).FormulaR1C1 Target.Offset(0, i).Value = Target.Offset(0, i) Next End If End Sub

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

اخي سعيد من يقوم بأرسال الايميل الخاص بالنشرة هو الاستاذ محمد طاهر وليس انا

أحسنت اخي الكريم

مبروك اخي عبدالهادي وان شاء الله نراك مستمر بتميزك بيننا

بارك الله فيك معلومة مفيدة

الأخ الفاضل / أحمد فضيله أحييك على هذه الدعوة وأضم صوتى الى صوتك

ههههههههههههه الله المستعان ما اصابك لم يكن ليخطائك وما اخطائك لم يكن ليصيبك

هذا ما توصلت اليه مساعدة في فاتورة.rar

اخي ابو شرف اعذرني فلم اجد الوقت الكافي لدخول النت امس وبعد محاولتي على ملفك وجدت اختلاف بين الملفين وكذلك اليوزر فورم لذا ما رايك لو حاولت التعديل على فورم الاستاذ خبور وليس على الفورم التي تم العمل عليها سابقاً

السلام عليكم نرجو عدم تكرار المواضيع ========= شاهد هذه الروابط 1. http://www.officena.net/ib/index.php?showtopic=39928 2. http://www.officena.net/ib/index.php?showtopic=40353 3. http://www.officena.net/ib/index.php?showtopic=40107

السلام عليكم اخي الفاضل انا بصراحة لم اتعامل مع موضوع الايميل والاكسل ولكن اليك هذه الروابط فقد تفيدك http://www.officena.net/ib/index.php?showtopic=29304 وهذا اايضاً http://www.officena.net/ib/index.php?showtopic=29748

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

السلام عليكم جرب هذا الكود Sub Macro1() Range("AL9:BK9").Copy Range("AL11:AL" & [A1000].End(xlUp).Row).PasteSpecial Paste:=xlPasteFormulas Application.CutCopyMode = False End Sub

السلام عليكم الكود منقول وهو للاخ (amroomo) مع إضافة بضع التناتيش عليه ليتناسب وطلبك الكود سيقوم بحفظ نسخة من الفاتورة في ملف باسم العيادة في الدرايفر D فاذا كان اسم العيادة موجود مسبقاً يتم اضافة العمل الى هذه العيادة والا يقوم بانشاء فولدر جديد جرب واعلمني بالنتيجة BSI2.zip

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

العفو منك لم اقم الا بواجبي ======== اخي انت تأمر وليس تطلب ان توفر الوقت والمعرفة فلن يدخر احد من الاخوة جهداً في المساعدة

السلام عليكم اخي فضل لي طلب عندك اتمنى ان تضع عناوين تدل على الطلب ====== في المرفق كودين كود لا ستدعاء الاسماء المطابقة للاسم == وكود ترحيل البيانات الى مكانها بعد تعديلها كود تعديل بيانات2.rar

تفضل المرفق مساعدة في فاتورة.rar

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

الاستاذ الفاضل / الخالدي حل مميز بالمعادلات ودليل تمكن من تطويع المعادلات زادك الله من علمه ونفع بك

بارك الله فيك اخي سعد