أبو قاسم قام بنشر أبريل 29, 2016 مشاركة قام بنشر أبريل 29, 2016 ارجو المساعدة بكود تحويل الساعات الى دقائق تحويل الساعات الى ثواني.rar رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أبريل 29, 2016 مشاركة قام بنشر أبريل 29, 2016 جرب هذا الملف ta7weel.rar رابط هذا التعليق شارك More sharing options...
أبو قاسم قام بنشر أبريل 29, 2016 الكاتب مشاركة قام بنشر أبريل 29, 2016 تشكر الف شكر رابط هذا التعليق شارك More sharing options...
أبو قاسم قام بنشر أبريل 29, 2016 الكاتب مشاركة قام بنشر أبريل 29, 2016 هل فية امكانية بعد تنفيذ الكود يقوم بمسح المعادلة طبعاً المطلوب تحويل الساعات الى دقائق فقط رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أبريل 29, 2016 مشاركة قام بنشر أبريل 29, 2016 26 دقائق مضت, أبو قاسم said: هل فية امكانية بعد تنفيذ الكود يقوم بمسح المعادلة طبعاً المطلوب تحويل الساعات الى دقائق فقط استبدل الكود بهذا Sub ta7wil_ila_sec() Application.ScreenUpdating = False lrj = Cells(Rows.Count, "j").End(3).Row If lrj < 6 Then lrj = 6 For i = 6 To lrj If Cells(i, "j") <> "" Then x = CDate(Range("j" & i)) h = Hour(x): m = Minute(x): s = Second(x) Cells(i, "j").Offset(0, 1) = h * 60 + m Cells(i, "j").Offset(0, 2) = h * 3600 + m * 60 + s Cells(i, "j").Offset(0, 1).Resize(1, 2).NumberFormat = "general" End If Next Application.ScreenUpdating = True End Sub 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان