ابوعلي الحبيب

مساعدة ياكرام

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

امل المساعدة

بارك الله فيك هل يعمل مع اوفيس 2016 Excel 2016 وذا كان نعم ماهي الخطوات مع الشكر

تم ارفاق ملف كود ترحيل.xlsm

السلام عليكم الاخوه الكرام امل المساعدة كيف يتم الترحيل بدون مسح المعادلات في الورقة المرحل اليها مثل ترحيل من ورقه 1 مطلوب ترحيل خليه a1 b1 g1 f1 الى ورقة 2 مكتوب في المعادله مكان الاعمده التي لا ترحل a1 , b1,"","", g1, f1 المشكله ان الاعمدة التي يتخطها الترحيل يقوم الكود بمسح المعادلات الموجوده في ورقه 2 ماهو الحل لكي تظل المعادلات كماهي ولكم الشكررررر

استاذي الفاضل وضعت المعادله في E7 =VALUE("a"&D7)+30 ولم يتغير شي

مساعدة ياكرام

استاذي المعادلة في العمود c هي =D7+30 1- انا اوريد العمل يكون دوما بواسطة فورم التاريخ المرفق في الملف اذا توقفت على عامودD وقمت بختيار التاريخ هجري يتم الاضافة حسب المطلوب ب عامودD وهذا لحد الان ممتاز الاشكال 2- وضعت معادلة في عامود c وهي =D7+30 بحيث يزيد التاريخ المختار 30 يوم ويظهر ولكن لا يظهر رغم تنسيق عامود d اتمنى يكون واضح التقويم الهجري3.rar

استاذي واخي الفاضل الاستاذ احمد زمان عملت ما في الملف المرفق منك ولكن لم تظهر النتيجة بشكل تلقائي مازالت نفس رسالة الخطاء #VALUE! حيث اريد الاكمال تلقائي اختار من فورم التقويم يظهر اذا توقفت في عامود D اريد اختار منه تاريخ هجري ثم يجمعه تلقائي بموجب معادلة موجودة في عامود C المفروض يظهر الناتج تاريخ صحيح ولكن يظهر لي خطاء #VALUE!

اشكرك اخي العزيز على الرد ولكن للاسف ليس هذا المقصود المقصود يوجد فورم التقويم يظهر اذا توقفت في عامود D اريد اختار منه تاريخ هجري ثم اجمعة بموجب معادلة موجودة في عامود C المفروض يظهر الناتج تاريخ صحيح ولكن يظهر لي خطاء #VALUE! هذا ملفي المرفق بالاول التقويم الهجري3.rar

السلام عليكم لماذا يقبل كتابة المعادلة بالتاريخ الميلادي ولا يقبل المعادلة في التاريخ الهجري تاريخ اليوم + 30 من جدول لاحد الاخوه مشكور مساعدة ياكرام التقويم الهجري3.rar

السلام عليكم ماذا يعني هذا الكود او ما فائدة الكود التالي مع الشكر Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox2.SetFocus End Sub

قام بنشر June 16 · ارسل تقرير عن المشاركه برجــــاء المساعدة برجــــاء المساعدة برجــــاء المساعدة برجــــاء المساعدة

السلام عليكم اخواني رسالة تطلب باسوورد بعد اغلاق الملف عندما اغلاق الاكسيل واختار حفظ تظهر الرسالة مرفق صورة VBAProject password وبعدها تظهر توقف الاكسيل مرفق صورة لدي اوفيس 2016 وقد وضعت حماية لمحرر الاكواد والاوراق امل المساعدة رسالة تطلب باسوورد بعد اغلاق الملف.rar

السلام عليك استاذ عبدالسلام ابوالعوافي الكود يعمل الان بشكل ممتاز جزاك الله خير كثر من امثالك ... ويبارك لك في علمك ومالك وولدك ... ويوسع لك في رزقك ... الله يجزاك الجنة ووالديك وجميع المسلمين ...

استاذ عبدالسلام اشكرك من كل اعماق قلبي على تفاعلك ولكن للاسف لم يعمل الكود في الاوراق الباقية

لسلام عليكم ورحمة الله وبركاته امل المساعدة كيف اكرر الكود هذا في جميع الاوراق لاني سوف نسخ الورقة الشيت كل فترة وصعب ادخاله يدوي كل مرة Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False ActiveWorkbook.Worksheets("ورقة1").Sort.SortFields.Clear ActiveWorkbook.Worksheets("ورقة1").Sort.SortFields.Add Key:=Range("k6"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("ورقة1").Sort .SetRange Range("b6:m23") .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub عمل الكود يرتب التاريخ حسب الاقدم مع العلم ان ThisWorkbook ملي بالاكواد مثل كود النسخ الاحتياطي ورسالة ترحيب وغيرها ولكم الشكر تكرار الكود في جميع الاوراق.rar

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

اللهم صلِّ وسلم وبارك على سيدنا محمد عليه أفضل الصلاة والسلام

برجــــاء المساعدة برجــــاء المساعدة برجــــاء المساعدة برجــــاء المساعدة

اللهم صلِّ وسلم وبارك على سيدنا محمد عليه أفضل الصلاة والسلام

اللهم صلِّ وسلم وبارك على سيدنا محمد عليه أفضل الصلاة والسلام

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