كيف يمكن تحويل الوقت إلى ساعات أو دقائق صحيحة في Excel؟
في Excel، غالبًا ما يعمل المستخدمون مع قيم الوقت لجدولة المهام أو تتبع المدد الزمنية أو حساب إجمالي ساعات العمل. افتراضيًا، عند استخدامك صيغة مثل=cell *24 للتحويل إلى ساعات، أو=cell *1440 للتحويل إلى دقائق، يُرجع Excel قيمًا عشرية تمثّل كسورًا دقيقة من الساعات أو الدقائق. لكن في العديد من السيناريوهات العملية — مثل حسابات الرواتب، أو إعداد التقارير، أو توزيع الموارد — قد تحتاج إلى تحويل هذه القيم الزمنية إلى ساعات أو دقائق صحيحة (مثلاً، تقريب 5.6 ساعة إلى 5 ساعات، أو تحويل 16.7 دقيقة إلى 17 دقيقة). يعرض هذا الدليل عدة طرق لتحقيق هذا التحويل بدقة، ويناقش تطبيقاتها والاعتبارات المرتبطة بها، لمساعدتك على اختيار أفضل نهج يناسب احتياجاتك الخاصة.
تحويل الوقت إلى ساعات أو دقائق صحيحة باستخدام صيغة
تحويل الوقت إلى ساعات أو دقائق صحيحة باستخدام Kutools لـ Excel
استخدام ماكرو VBA للتحويل إلى ساعات أو دقائق صحيحة
تقريب الساعات أو الدقائق باستخدام صيغ التقريب في Excel
تحويل الوقت إلى ساعات أو دقائق صحيحة باستخدام صيغة
إذا كنت تبحث عن حلٍّ سريع باستخدام صيغ Excel، يمكنك تحويل القيم الزمنية إلى ساعات أو دقائق صحيحة بمساعدة دالة INT. يُعد هذا الأسلوب مثاليًا عندما لا تكون القيم العشرية مرغوبة، مثلًا عند تتبع ساعات العمل الكاملة لكل وردية أو التقريب إلى آخر دقيقة مكتملة.
لاستخدام هذه الصيغة، اختر الخلية التي تريد عرض النتيجة فيها، ثم أدخل إحدى الصيغ التالية حسب متطلباتك:
- التحويل إلى ساعات صحيحة:=INT(A2*24)
- التحويل إلى دقائق صحيحة:=INT(A2*1440)
بعد إدخال الصيغة، اضغطEnter لعرض النتيجة. إذا كانت لديك قائمة من الأوقات التي تريد تحويلها، فاسحب مقبض التعبئة لأسفل لتطبيق الصيغة على الخلايا الأخرى.
ملاحظة: تقوم دالة INT دائمًا بالتقريب للأسفل، لذا ضع في اعتبارك أن القيم مثل 6.9 ساعة ستُعرض كـ6. إذا كنت بحاجة إلى طريقة تقريب مختلفة (للأعلى أو لأقرب عدد صحيح)، فاطّلع على الحلول التالية.
تحويل الوقت إلى ساعات أو دقائق صحيحة باستخدام Kutools لـ Excel
إذا كان لديك Kutools لـ Excel مثبَّتًا، فإن تحويل الوقت إلى ساعات أو دقائق صحيحة يصبح أسرع وأكثر مرونة! يوفِّر Kutools أداةتحويل الوقتلتحويل الوقت أولًا إلى أرقام عشرية، ثم يتيح لك تقريب القيمة لأعلى أو لأسفل أو لأقرب عدد صحيح باستخدام ميزةالتقريبالخاصة به. ويُعد هذا الأسلوب حلاً عمليًّا للتحويلات الجماعية، وهو مفيدٌ بشكل خاص عند التعامل مع مجموعات بيانات كبيرة، حيث يكون إدخال الصيغ يدويًّا أمرًا مرهقًا.
1. حدد نطاق القيم الزمنية التي تريد تحويلها. بعد ذلك، انتقل إلىKutools > المحتوى > تحويل الوقت > تحويل إلى ساعاتأوتحويل إلى دقائقحسب احتياجاتك.
2. عند اكتمال التحويل، ستظهر نافذة منبثقة تُشير إلى عدد الخلايا التي تم تحويلها؛ انقرموافقلإغلاقها. اترك الخلايا المحولة محددة، ثم انقرKutools > التقريب.
 |  |  |
3. في مربع الحوارالتقريب بدون استخدام الصيغة، اكتب0 في مربع النصعدد الأماكن العشريةلضبط التقريب على أقرب عدد صحيح. ثم اختر خيار التقريب المفضل لديك من قسمالخيار: التقريب العادي (إلى أقرب عدد صحيح)، أوالتقريب للأعلى، أوالتقريب للأسفل.
4. انقرموافقلتطبيق التقريب، وستُحوَّل جميع القيم المحددة إلى ساعات أو دقائق صحيحة.
يُوصى باستخدام Kutools إذا كنت بحاجة إلى تنفيذ عمليات تحويل وتجميع متكررة عبر العديد من الأوراق، إذ تساعد واجهته القائمة على القوائم في تقليل أخطاء الصيغ.
استخدام ماكرو VBA للتحويل إلى ساعات أو دقائق صحيحة
يُعد هذا الحل مثاليًا للمستخدمين الراغبين في أتمتة تحويل القيم الزمنية إلى ساعات أو دقائق صحيحة عبر مجموعات بيانات كبيرة، أو تطبيق هذه التحويلات على نطاقات متعددة دون الحاجة إلى إدخال الصيغ يدويًّا. ويتيح لك ماكرو VBA اختيار التقريب للأسفل أو للأعلى أو لأقرب عدد صحيح، مع إمكانية تخصيصه بسهولة وفقًا لمتطلباتك.
1. انقرأدوات المطور > Visual Basic. في نافذة Microsoft Visual Basic for Applications التي تظهر، انقرإدراج > وحدة نمطية، ثم الصق الكود أدناه في الوحدة النمطية:
Sub ConvertTimeToInteger_OutputElsewhere()
Dim rng As Range
Dim cell As Range
Dim resType As String
Dim roundMethod As String
Dim outRng As Range
Dim xTitleId As String
Dim val As Double, res As Double
xTitleId = "KutoolsforExcel"
On Error Resume Next
Set rng = Application.Selection
Set rng = Application.InputBox("Select range to convert:", xTitleId, rng.Address, Type:=8)
If rng Is Nothing Then Exit Sub
On Error GoTo 0
On Error Resume Next
Set outRng = Application.InputBox("Select a cell for output:", xTitleId, Type:=8)
If outRng Is Nothing Then Exit Sub
On Error GoTo 0
resType = Application.InputBox("Choose type (Hour/Minute):", xTitleId, "Hour", Type:=2)
roundMethod = Application.InputBox("Rounding method (Down/Up/Nearest):", xTitleId, "Down", Type:=2)
For Each cell In rng
If IsNumeric(cell.Value) Then
If UCase(resType) = "HOUR" Then
val = cell.Value * 24
Else
val = cell.Value * 1440
End If
Select Case UCase(roundMethod)
Case "UP"
res = WorksheetFunction.RoundUp(val, 0)
Case "NEAREST"
res = WorksheetFunction.Round(val, 0)
Case Else
res = WorksheetFunction.RoundDown(val, 0)
End Select
outRng.Offset(cell.Row - rng.Row, cell.Column - rng.Column).Value = res
End If
Next cell
MsgBox "Conversion completed! Results placed starting at " & outRng.Address, vbInformation
End Sub
2. لتشغيل الكود، انقر على زر
التشغيل في نافذة VBA. ستظهر لك نافذة منبثقة تطلب منك تحديد النطاق المستهدف وخلايا الإخراج، واختيار «ساعة» أو «دقيقة» للتحويل، وتحديد طريقة التقريب المطلوبة. وبعد ذلك، سيقوم الماكرو تلقائيًا بتحويل جميع الخلايا الزمنية المحددة إلى أعداد صحيحة وفقًا لاختياراتك.
تقريب الساعات أو الدقائق باستخدام صيغ التقريب في Excel
عندما تحتاج إلى التحكّم في طريقة التقريب—سواءً للأعلى أو للأسفل أو لأقرب عدد صحيح—يوفّر Excel مجموعةً من دوال التقريب المدمجة. ويُعدّ هذا الحل مثاليًا للحالات التي تتطلب دقةً ومرونةً، مثل تقريب أجزاء الساعات دائمًا للأعلى في حسابات الرواتب، أو تقريب الوقت لأقرب دقيقة في سجلات الحضور.
1. أدخل إحدى الصيغ التالية في الخلية التي ترغب في ظهور النتيجة بها (مثلًا، B2):
- التقريب إلى أقرب ساعة صحيحة:
=ROUND(A2*24,0) - التقريب للأسفل إلى ساعة صحيحة:
=ROUNDDOWN(A2*24,0) - التقريب للأعلى إلى ساعة صحيحة:
=ROUNDUP(A2*24,0) - التقريب إلى أقرب دقيقة صحيحة:
=ROUND(A2*1440,0) - التقريب للأسفل إلى دقيقة صحيحة:
=ROUNDDOWN(A2*1440,0) - التقريب للأعلى إلى دقيقة صحيحة:
=ROUNDUP(A2*1440,0)
2. اضغطEnter لتأكيد الصيغة. ولتحويل عمود من القيم الزمنية، انسخ الصيغة لأسفل بسحب مقبض التعبئة من الخلية التي أدخلت فيها الصيغة. تأكد من تعديل مراجع الخلايا حسب حاجتك إلى نطاق البيانات.
تختلف سلوكيات الدوال ROUND وROUNDUP وROUNDDOWN: استخدم **ROUND** للحصول على أقرب عدد صحيح، و**ROUNDUP** إذا أردت التأكد من تقريب أي قيمة كسرية **لأعلى**، و**ROUNDDOWN** إذا أردت دائمًا تقريب القيمة **لأسفل**. اختر الدالة الأنسب لسيناريوك!
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل