كيف تُدرج النقطتين الرأسيتين بين الأرقام ليتم تنسيقها تلقائيًا كوقت في Excel؟

عند إدخال قيم الوقت في خلايا ورقة عمل Excel، قد يكون كتابة النقطتين الرأسيتين يدويًّا في كل مرة أمرًا مرهقًا—مثل كتابة "12:34" بدلًا من مجرد "1234". غالبًا ما يبحث المستخدمون عن طريقة مريحة لتحويل الأرقام بسرعة إلى تنسيقات وقت قياسية. ويستعرض هذا الدليل طرقًا عملية لإدراج النقطتين الرأسيتين تلقائيًّا بين الأرقام وتنسيقها كوقت في Excel، مما يوفّر عليك الجهد ويقلل أخطاء إدخال البيانات، سواء كنت تعمل مع جداول زمنية أو طوابع وقت أو تسجيل فترات النشاط.

إدراج النقطتين الرأسيتين بين الأرقام لجعلها بتنسيق الوقت باستخدام الصيغ

إذا كان لديك بالفعل عمود من الأرقام وتريد تحويلها تلقائيًّا إلى تنسيق الوقت — مثل تحويل "915" إلى "09:15" أو "121530" إلى "12:15:30" — دون الحاجة إلى إدخال النقطتين الرأسيتين يدويًّا، فإن صيغ Excel هي الحل الأمثل. هذه الطريقة مثالية لمعالجة قوائم كبيرة من الإدخالات الرقمية الموجودة مسبقًا في ورقة العمل الخاصة بك بسرعة وسهولة.

أدناه ستجد حلين بصيغتين مختلفتين، وذلك بناءً على عدد الأرقام في إدخالاتك الرقمية. تأكد من استخدام الصيغة التي تتوافق مع نوع بياناتك للحصول على أفضل النتائج.

إذا كانت الأرقام تحتوي على 3 أو 4 أرقام، يمكنك استخدام هذه الصيغة:

أدخل هذه الصيغة في الخلية المجاورة (على سبيل المثال، إذا كان رقمك في الخلية A1، فأدخل الصيغة في B1):

=TIME(LEFT(A1,LEN(A1)-2),RIGHT(A1,2),0)

بعد إدخال الصيغة، اضغطEnter للتأكيد. بعد ذلك، اسحب مقبض التعبئة من زاوية خلية الصيغة لتطبيقها تلقائيًّا على الصفوف الأخرى حسب الحاجة. تعمل هذه الطريقة بشكل أفضل مع أرقام مثل "915" (التي تتحول إلى 9:15) أو "1234" (التي تصبح 12:34). انظر معاينة النتيجة:

نقطة أساسية: تستخرج الصيغة جزء الساعة من الرقمين الأولين، وجزء الدقائق من الرقمين الأخيرين، وتحدد الثواني بالصفر.

إذا كانت الأرقام مكوَّنة من 5 أو 6 أرقام، جرّب هذه الصيغة:

أدخل هذه الصيغة في الخلية المقابلة (مثال: إذا كان "123456" في الخلية A1، فأدخلها في B1):

=(INT(A1/10000)&":"&INT(MOD(A1,10000)/100)&":"&MOD(A1,100))+0

تأكد من الضغط علىEnter، ثم اسحب مقبض التعبئة لأسفل لتعبئة الخلايا المتبقية. هذه الصيغة مثالية للأرقام مثل "123456" (التي تصبح 12:34:56) أو "93005" (التي تتحول إلى 9:30:05). إليك معاينة للنتائج أدناه:

داخل الصيغة، يتم استخراج الساعات والدقائق والثواني ودمجها مع النقطتين الرأسيتين، ثم يُضاف 0 لإجبار Excel على التعرّف عليها كقيمة وقت.

بعد تطبيق الصيغ أعلاه، إذا ظهرت النتيجة كرقم تسلسلي (مثل "0.3875") بدلًا من الوقت، فقم بتنسيق النتائج كوقت عن طريق تحديد النطاق المملوء، ثم انتقل إلى علامة التبويبالصفحة الرئيسية، وانقر على القائمة المنسدلة لـتنسيق الأرقام(المُسمَّاة غالبًا بـ «عام») واخترالوقت. وسيحوّل ذلك النتيجة تلقائيًا إلى عرض وقت مناسب:

نصائح عملية:
• تأكد من أن المرجع الخلوي (مثل A1) يتطابق مع موقع بياناتك الفعلي، وقم بتعديل مراجع الصيغة حسب الحاجة.
• تحقق من أن جميع أرقامك تتوافق مع الطول المتوقع (3–4 أرقام أو 5–6 أرقام) قبل تطبيق الصيغ.
• لتحويل نتيجة الصيغة إلى قيم ثابتة، انسخها ثم استخدم ‹لصق خاص› واختر ‹قيم›.

القيود: تعمل هذه الصيغ فقط مع الأرقام المهيكلة بنمط ساعة-دقيقة أو ساعة-دقيقة-ثانية. إذا كانت البيانات غير متسقة في الطول، فقد تحتاج إلى تعديل يدوي أو استخدام صيغ مخصصة.

إذا ظهر خطأ #VALUE!، فتأكد من خلو الخلايا من القيم الفارغة أو الأحرف غير الرقمية، وتحقق من تطابق التنسيق العددي. وأدخل أرقامًا فقط في الخلية المصدر.

افتح سحر إكسل مع KUTOOLS AI

• التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
• الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
• برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
• تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
• ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!

حسِّن قدراتك في إكسل بأدوات مدعومة بالذكاء الاصطناعي.حمِّل الآنوجرِّب الكفاءة كما لم تفعل من قبل!

تحويل الأرقام تلقائيًّا إلى تنسيق الوقت أثناء إدخالها باستخدام كود VBA

للمستخدمين الذين يُدخلون قيمًا رقمية بشكل متكرر ويرغبون في أن يُجري Excel تنسيقها تلقائيًّا كوقت مع النقطتين الرأسيتين، يمكن أتمتة هذه العملية باستخدام كود VBA. ويُعد هذا الحل مثاليًّا لإدخال البيانات الخام ضمن نطاق محدد، حيث يحوّل كل رقم فور إدخاله إلى تنسيق الوقت—ما يقلل المهام المتكررة ويحد من أخطاء الكتابة.

اتبع هذه الخطوات لإعداد الأتمتة:

1. في ورقة العمل التي تريد تنسيق الأرقام فيها تلقائيًّا كوقت، اختر تبويب الورقة من الأسفل.

2. انقر بزر الماوس الأيمن على تبويب الورقة، ثم اخترعرض الكودمن القائمة. سيؤدي ذلك إلى فتح محررMicrosoft Visual Basic for Applications. الصق الكود أدناه في نافذة الكود الفارغة المقابلة لورقة العمل الخاصة بك (وليس في وحدة قياسية):

كود VBA: تحويل الأرقام تلقائيًّا إلى تنسيق الوقت:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'Updateby Extendoffice 20160606
    Dim xStr As String
    Dim xVal As String
    On Error GoTo EndMacro
    If Application.Intersect(Target, Range("A1:A20")) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    With Target
        If Not .HasFormula Then
            xVal = .Value
            Select Case Len(xVal)
                Case 1 ' e.g., 1 = 00:01 AM
                    xStr = "00:0" & xVal
                Case 2 ' e.g., 12 = 00:12 AM
                    xStr = "00:" & xVal
                Case 3 ' e.g., 735 = 7:35 AM
                    xStr = Left(xVal, 1) & ":" & Right(xVal, 2)
                Case 4 ' e.g., 1234 = 12:34
                    xStr = Left(xVal, 2) & ":" & Right(xVal, 2)
                Case 5 ' e.g., 12345 = 1:23:45 NOT 12:03:45
                    xStr = Left(xVal, 1) & ":" & Mid(xVal, 2, 2) & ":" & Right(xVal, 2)
                Case 6 ' e.g., 123456 = 12:34:56
                    xStr = Left(xVal, 2) & ":" & Mid(xVal, 3, 2) & ":" & Right(xVal, 2)
                Case Else
                    Err.Raise 0
            End Select
            .Value = TimeValue(xStr)
        End If
    End With
    Application.EnableEvents = True
    Exit Sub
EndMacro:
    MsgBox "You did not enter a valid time"
    Application.EnableEvents = True
End Sub

ملاحظة:تم استخدام نطاق الخلاياA1:A20 في المثال، ولكن يمكنك بسهولة تغيير هذا المرجع ليتناسب مع احتياجاتك (مثل B2:B100، إلخ). سيتم تنسيق الأرقام التي تُدخلها ضمن النطاق المحدد تلقائيًّا. أما إذا استخدمت صيغًا، فلن يقوم الماكرو بتعديل تلك القيم.

3. الآن، عند إدخال رقم يمثل وقتًا (مثل 102319) في نطاق الخلايا المستهدف ثم الضغط علىEnter، سيقوم الكود فورًا بتفسير هذا الإدخال وتحويله تلقائيًّا إلى تنسيق الوقت (في هذا المثال: «10:23:19 ص»)—دون الحاجة إلى أي تنسيق يدوي إضافي:

تذكيرات مفيدة:
• إذا أدخلت رقمًا غير صالح، فستظهر رسالة منبثقة تقول: «لم تُدخل وقتًا صحيحًا.»
• تأكد من أنApplication.EnableEvents لم يتم إيقافه في مكان آخر في ملف العمل الخاص بك بعد تشغيل هذا الماكرو، وإلا فلن يعمل التحويل التلقائي.
• لإعادة استخدام هذا الماكرو في ورقة أخرى، كرّر خطوات الإعداد في نافذة الكود الخاصة بتلك الورقة.
• القيود: الكود مصمم لتسلسلات الأرقام فقط (بدون مسافات أو نقطتين رأسيتين أو أي فواصل أخرى). ولن يتم تحويل الإدخالات المختلطة أو غير الرقمية.

أفضل حالة استخدام: عندما يخضع إدخال المستخدم في ورقة العمل للرقابة، وتتطابق البيانات دائمًا مع التنسيقات والأطوال المتوقعة.

استكشاف الأخطاء وإصلاحها: إذا لم يُنفَّذ الماكرو، فتأكد من تفعيل الأحداث، واستخدام النطاق الصحيح، ولصق الماكرو في نافذة كود الورقة. وإذا كانت أرقامك تتبع هيكلًا رقميًّا مختلفًا، فقد تحتاج إلى تخصيص منطق VBA بشكل أكبر.

بديل: إدراج النقطتين الرأسيتين بين الأرقام باستخدام ميزة «نص إلى أعمدة» لتحويلها إلى تنسيق الوقت

حل عملي آخر لتقسيم الأرقام إلى مكونات الوقت هو ميزةنص إلى أعمدةفي Excel، وهي مثالية خصوصًا عندما تريد فصل الأرقام إلى أعمدة منفصلة للساعات والدقائق والثواني قبل دمجها مجددًا كقيمة وقت.

أولاً، حدد العمود الذي يحتوي على أرقامك. انتقل إلىبيانات > نص إلى أعمدة. اخترالعرض الثابت، وعيّن نقاط الفصل لتقسيم الساعات والدقائق والثواني بناءً على مواضع الأرقام. بعد التقسيم، استخدم صيغةTIME أوTIMEVALUE لإعادة الدمج كوقت في عمود جديد.
مثال: إذا قمت بتقسيم "123456" إلى ثلاثة أعمدة: "12" (ساعات)، و"34" (دقائق)، و"56" (ثواني)، يمكنك إدخال:

=TIME(A1,B1,C1)

المزايا: لا حاجة لصيغ معقدة أو VBA، مما يجعله مثاليًا للتحويلات الدفعية.
العيوب: يتطلب ضبطًا يدويًّا لنقاط التقسيم وإعادة الدمج، ولا يعمل تلقائيًّا عند الإدخال.

للحصول على مساعدة خطوة بخطوة حولنص إلى أعمدة، راجعوثائق Microsoft الرسمية.

اقتراح موجز: لتحويلات لمرة واحدة أو منتظمة، استخدم طريقة الصيغة أو أداة «نص إلى أعمدة». أما للتحويل الفوري أثناء الإدخال المستمر، فطبّق أتمتة VBA. تأكد دائمًا من هيكل الأرقام الفعلي في بياناتك قبل اختيار الطريقة، وحدّد بوضوح نطاق الخلايا المستهدف لتجنب النتائج غير المتوقعة. وعند الحاجة، احفظ نسخة احتياطية من بياناتك قبل تنفيذ أي تحويلات دفعية.

أفضل أدوات الإنتاجية لمكتبتك

🤖	KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
	الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
	بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
	قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
	مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
	ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
	أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

مزيد من التفاصيل حول Kutools لـ Excel...تنزيل مجاني...

---

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

• تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
• افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
• يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

مزيد من التفاصيل حول Office Tab...تنزيل مجاني...

---

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

• حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
• برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
• يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
• تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
• أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل

مزيد من التفاصيل حول Kutools for Office...تنزيل مجاني...