AbuuAhmed

سبحان الله، الموضوع كان نشط وبمجرد شاركت أنا فيه نام وخمد!! نفس الفكرة ولكن من خلال زر ارقام النتائج عربي_05.xlsm

جرب هذا الكود في حدث التغيير للصفحة إذا راقت لكم الفكرة فقوموا بالتعديل على الكود حسب الرغبة لا تنتطروني .. Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Column = 22 And .Row >= 6 And .Row <= 9 Then If .Value = 0 Then .NumberFormat = "0;-0;;@" ElseIf .Value = Fix(.Value) Then .NumberFormat = "[$-2010401]0" Else .NumberFormat = "[$-2010401]0.00" End If Debug.Print .Address, .Value, .NumberFormat End If End With End Sub

أول خانة هي رمز القرن ويمكن علاجه بطريقة أفضل حسب وجهة نظري كالتالي: cy = (Left(MyNumber, 1) + 17) * 100 لتصبح النتائج كالتالي: 1700 0 1800 1 1900 2 2000 3 2100 4

سؤالك غير واضح، لو ترفع مثال وبمزيد من الشرح ستجد أكثر من عضو يشارك معك المحاولة.

أخي العزيز أرسلت لك رسالة على الخاص.

جرب هذا المثال: https://drive.google.com/file/d/1_gpuyZaEvQ_SdM8T3VhuepoAIuTcfgI3/view?usp=drive_web

جرب تنسيق الخلايا هذا: [$-2060000]0

صممت لك شفرة تصحيح عمودي المبالغ وتاريخ الإنشاء: Sub CorrectFormat() Columns("C:C").Select With Selection .Replace What:=" ", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False .HorizontalAlignment = xlRight .NumberFormat = "#,##0.00" End With Columns("G:G").Select With Selection .Replace What:=",", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False End With End Sub Paymob333_01.xlsm

فهمتك بشكل خاطئ، الحل السابق لحل حقل التاريخ النصي إلى حقل تاريخ أما مشكل حقل الأرقام المطلوب جمعها فهناك حل يدوي تعود على استخدامه باستخدام صندوق البحث والاستبدال كالتالي: - بالفأرة قف على أي رقم من نفس العمود. - من شريط المعادلات Formula bar هناك رمز في آخر الرقم يظهر كمسافة ظلله ثم احفظه في الذاكرة. - ظلل عمود الأرقام. - افتح صندوق البحث والاستبدال ثم الصف في خانة البحث ما تم حفظه في الذاكرة. - انقر زر استبدال الكل.

استخدام هذه المعادلة: = SUBSTITUTE(G3, ",", "", 1) * 1

مقارنة TwoPeriods_02.xlsx

أنصح بتعديل بسيط في معادلة جمع الأيام عندما يكون مجموع المدد لأكثر من فترتين ويكون فيها مجموع خانة/عمود الأيام كبيرا كالتالي: =(O37+K37)*360 + (N37+J37)*30 + ROUND((M37+I37)/365*360,0) بدلا من: =(O37+K37)*360 + (N37+J37)*30 + (M37+I37)

محاولتي: TwoPeriods_01.xlsx

ربما هو المطلوب BASE-E5_02.accdb

محاولتي: معادلة طرح وجمع تاريخين_02.xlsx