كيف يمكن تحويل التنسيق yyyymmddhhmmss إلى تاريخ ووقت قياسيين في Excel؟
في الممارسة العملية، من الشائع مواجهة بيانات تم تصديرها من أنظمة أخرى أو ملفات سجل تحتوي على التاريخ والوقت كسلسلة واحدة متصلة بالتنسيق yyyymmddhhmmss. فعلى سبيل المثال، تمثّل السلسلة "20240630174521" التاريخ والوقت على النحو التالي: 30/06/2024 17:45:21. لكن Excel لا يتعرّف تلقائيًا على هذه السلسلة كقيمة تاريخ ووقت قياسية، ما يجعل تحليلها أو فرزها أو إجراء العمليات الحسابية عليها أمرًا عسيرًا. ولذلك، يُعد تحويل هذه السلاسل إلى تنسيق التاريخ والوقت المعترف به في Excel (مثل dd/mm/yyyy hh:mm:ss) خطوةً ضرورية لتمكين المعالجة اللاحقة، والتصفية، وإعداد التقارير بكفاءة.
يقدّم هذا المقال إرشاداتٍ عمليةً خطوة بخطوة لتحويل سلاسل التنسيق `yyyymmddhhmmss` إلى تنسيق التاريخ والوقت القياسي في Excel. سنستعرض عدة طرق — بدءًا من استخدام الصيغ للتحويل السريع داخل الخلية، ووصولًا إلى حلول البرمجة الآلية (VBA)، فضلاً عن استخدام Power Query بطريقة مرئية وأكثر مرونة. وكل طريقة تناسب سيناريوهاتٍ مختلفةً وفقًا لاحتياجاتك، وحجم بياناتك، ومدى إلمامك بميزات Excel.
تحويل التنسيق yyyymmddhhmmss إلى تعيين تنسيق التاريخ والوقت عادي باستخدام الصيغ
كود VBA - تحويل التنسيق yyyymmddhhmmss إلى التاريخ والوقت عادي تلقائيًا
تحويل التنسيق yyyymmddhhmmss إلى تعيين تنسيق التاريخ والوقت عادي باستخدام الصيغ
توفر صيغ Excel وسيلةً سريعةً وموثوقةً لتقسيم سلسلة التنسيق yyyymmddhhmmss وإعادة تنسيقها إلى قيمة تاريخ ووقت يعترف بها Excel مباشرةً في ورقة العمل، دون الحاجة إلى إضافات خارجية أو أدوات متقدمة. وهي الطريقة المثلى لمجموعات البيانات الصغيرة نسبيًا أو عندما ترغب في تحويلٍ يدويٍّ شفافٍ وسهل التدقيق.
لتحويل السلسلة، أدخل الصيغة التالية في خلية فارغة (على سبيل المثال، في الخلية B2 إذا كانت القيمة الأصلية ذات التنسيق yyyymmddhhmmss موجودة في الخلية A2):
=TEXT(DATE(LEFT(A2,4),MID(A2,5,2),MID(A2,7,2))+TIME(MID(A2,9,2),MID(A2,11,2),MID(A2,13,2)),"dd/mm/yyyy hh:mm:ss")الإرشادات:بعد إدخال الصيغة، اضغط Enter للتأكيد. إذا كانت لديك قائمة بقيم التنسيق yyyymmddhhmmss في العمود A، فما عليك سوى سحب مقبض التعبئة من الخلية B2 لأسفل لتطبيق الصيغة بسرعة على الصفوف الأخرى. وستُظهر نتيجة كل صيغة تاريخًا ووقتًا منسَّقَين كنص.
هذه الطريقة عملية جدًّا لتنظيف البيانات العرضية أو القوائم الصغيرة أو الحالات التي ترغب فيها في الاحتفاظ بالسلسلة الأصلية كما هي في عمود واحد والقيمة المنقَّحة في عمود آخر. العيوب المحتملة: نتيجة الصيغة تظل نصًّا؛ فإذا كنت بحاجة إلى قيمة تاريخ ووقت حقيقية في Excel لأغراض الحساب (مثل الفروق الزمنية)، فقد تحتاج إلى تحويل النص إلى تنسيق رقمي.
شرح المعاملات ونصائح:
- LEFT(A2,4): تستخرج السنة المكوَّنة من 4 أرقام
- MID(A2,5,2): تستخرج الشهر المكوَّن من رقمين
- MID(A2,7,2): تستخرج اليوم المكوَّن من رقمين
- MID(A2,9,2): تستخرج الساعة المكوَّنة من رقمين
- MID(A2,11,2): تستخرج الدقيقة المكوَّنة من رقمين
- MID(A2,13,2): تستخرج الثانية المكوَّنة من رقمين
- تقوم الدالةTEXT() بتنسيق الناتج كسلسلة تاريخ ووقت يسهل قراءتها.
المشاكل المحتملة:إذا لم تكن أيٌّ من القيم الأصلية مكوَّنة بالضبط من 14 رقمًا (مثلًا، بسبب غياب الأصفار البادئة أو إدخالها عن طريق الخطأ بصيغة أُسية)، فقد تُرجع الصيغ نتائج غير صحيحة أو أخطاء. تأكد من اتساق المدخلات قبل استخدام التحويل القائم على الصيغ.
بدلاً من ذلك، إذا كانت بياناتك دائمًا مكوَّنة بالضبط من 14 رقمًا، فإن هذه الصيغة الأقصر تقوم بتحويل السلسلة وتعيد قيمة تاريخ ووقت تسلسلية في Excel (وليست نصًّا):
=--TEXT(A2,"0000\-00\-00\ 00\:00\:00")طريقة الاستخدام:بعد إدخال هذه الصيغة في خلية (مثل B2)، اضغط Enter. بعد ذلك، قد تحتاج إلى تنسيق الخلية (أو الخلايا) الناتجة كـDD/MM/YYYY HH:MM:SSباستخدام مربع حوار «تعيين تنسيق الخلية» لعرض القيمة بتنسيق تاريخ ووقت مقروء. للقيام بذلك، حدد خلايا الناتج، ثم انقر بزر الماوس الأيمن واخترتعيين تنسيق الخلية > مخصص (Custom)، وأدخلdd/mm/yyyy hh:mm:ss كرمز التنسيق.
الطريقة الثانية فعّالة جدًّا إذا كنت ترغب في الحصول على قيمة تاريخ حقيقية بدلًا من سلسلة نصية.
تلميح:إذا كنت تنوي استخدام نتائج التاريخ والوقت المحولة في عمليات حسابية إضافية (مثل طرح تواريخ أو حساب الفترات الزمنية)، فاستخدم دائمًا الصيغة التي تُرجع رقمًا تسلسليًّا (الصيغة الثانية)، ثم قم بتنسيقها حسب الحاجة.
استكشاف الأخطاء وإصلاحها:إذا ظهرت أخطاء، تحقَّق مما إذا كانت البيانات الأصلية نصوصًا فعلية وخالية من الأحرف غير الرقمية. قد تؤثر المسافات البادئة أو الفراغات الزائدة في النتائج أيضًا؛ لذا فكِّر في تنظيف البيانات باستخدامTRIM(A2)داخل الصيغة إذا كنت تشكّ في وجود هذه المشكلة.
كود VBA - تحويل التنسيق yyyymmddhhmmss إلى التاريخ والوقت عادي تلقائيًا
يقدِّم VBA (Visual Basic for Applications) حلاً مرنًا للمستخدمين الذين يتعاملون مع مجموعات بيانات كبيرة أو يرغبون في أتمتة عملية التحويل. فمن خلال استخدام حلقة تكرارية عبر الخلايا المحددة، يمكنك تحويل كل قيمة بالتنسيق yyyymmddhhmmss إلى قيمة تاريخ ووقت قياسية في Excel—إما في مكانها الأصلي أو في عمود مستهدف. وتُعد هذه الطريقة مثالية لتجنُّب كتابة الصيغ يدويًّا عبر خلايا متعددة، وكذلك عند تحديث بياناتك بشكل متكرر.
هذه الطريقة مثالية لمجموعات البيانات الكبيرة أو المهام المتكررة. ومع ذلك، يتطلب استخدام VBA تمكين الماكروات، والتي قد تمنعها سياسات مؤسستك أو إعدادات Excel. قبل تشغيل أي كود VBA، لا تنسَ حفظ ملفك، إذ قد لا تكون التغييرات قابلة للتراجع بسهولة دائمًا.
خطوات التشغيل:
- حدِّد نطاق القيم ذات التنسيق yyyymmddhhmmss في ورقة العمل التي تحتاج إلى تحويلها (مثلًا، A2:A100).
- انقر فوق علامة التبويبالمطوِّر (Developer)، ثم انقر فوقVisual Basic لفتح محرر VBA. في اللوحة الموجودة على اليسار، ابحث عن ملف العمل الخاص بك، ثم انقر بزر الماوس الأيمن واخترإدراج (Insert) > وحدة نمطية (Module). في نافذة الكود، الصق الكود التالي:
Sub Convert_yyyymmddhhmmss_To_DateTime()
Dim rng As Range
Dim cell As Range
Dim strDate As String
Dim y As Integer
Dim m As Integer
Dim d As Integer
Dim hh As Integer
Dim mm As Integer
Dim ss As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.InputBox("Select the range of yyyymmddhhmmss values to convert:", xTitleId, Selection.Address, Type:=8)
For Each cell In rng
strDate = Trim(cell.Value)
If Len(strDate) = 14 And IsNumeric(strDate) Then
y = CInt(Left(strDate, 4))
m = CInt(Mid(strDate, 5, 2))
d = CInt(Mid(strDate, 7, 2))
hh = CInt(Mid(strDate, 9, 2))
mm = CInt(Mid(strDate, 11, 2))
ss = CInt(Mid(strDate, 13, 2))
cell.Value = DateSerial(y, m, d) + TimeSerial(hh, mm, ss)
cell.NumberFormat = "dd/mm/yyyy hh:mm:ss"
End If
Next cell
End Subبعد لصق الكود، أغلق محرر VBA. ثم عُد إلى Excel وشغِّل الماكرو بالضغط علىAlt + F8، وحدد "Convert_yyyymmddhhmmss_To_DateTime"، ثم انقر فوقتشغيل (Run). سيطلب منك الماكرو تحديد النطاق، ثم يحوِّل كل سلسلة رقمية مكوَّنة من 14 رقمًا إلى قيمة تاريخ ووقت يسهل قراءتها مباشرةً في مكانها.
نصائح واستكشاف الأخطاء:
- إذا لم يتم تحويل بعض القيم، فتحقق من أن طول كلٍّ منها يبلغ بالضبط 14 رقمًا، وتأكد من خلوها من المسافات الزائدة وأن تكون جميع القيم أرقامًا فقط.
- يمكنك نسخ قيم التاريخ والوقت المحولة إلى عمود آخر قبل تشغيل ماكرو إذا رغبت في الحفاظ على القيم الأصلية دون تغيير.
- احفظ ملف العمل دائمًا قبل تشغيل الماكروات، وتأكد من تمكين الماكروات في Excel.
المزايا:تعالج نطاقات كبيرة بسرعة، ويمكن أتمتتها بسهولة للمهام المتكررة.
العيوب:تتطلب تمكين الماكروات، وقد لا تكون مناسبة دائمًا في البيئات التي تفرض قيودًا أمنية على الماكروات.
افتح سحر إكسل مع KUTOOLS AI
- التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
- الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
- برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
- تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
- ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل