كيفية السماح بتنسيق التاريخ فقط في خلايا معينة؟
كيف يمكنك تقييد قائمة الخلايا للسماح فقط بإدخال تنسيق التاريخ في ورقة عمل Excel؟ في هذا المقال سأتحدث عن بعض الحيل الشيقة للتعامل مع هذه الوظيفة.
السماح بتنسيق التاريخ فقط في خلايا محددة مع وظيفة التحقق من صحة البيانات
السماح بتنسيق التاريخ فقط في خلايا محددة برمز VBA
السماح بتنسيق التاريخ فقط في خلايا محددة مع وظيفة التحقق من صحة البيانات
في Excel ، فإن ملف التحقق من صحة البيانات هي وظيفة قوية يمكن أن تساعدك في إنشاء قائمة منسدلة ، لمنع الإدخالات المكررة ، إلخ. كما يمكنها مساعدتك في منع إدخال تنسيق بيانات آخر ولكن فقط تنسيق التاريخ في خلايا معينة. يرجى اتباع الخطوات التالية:
1. انقر البيانات > التحقق من صحة البيانات > التحقق من صحة البيانات، انظر لقطة الشاشة:
2. في التحقق من صحة البيانات مربع الحوار، انقر فوق الإعدادات علامة التبويب ، ثم اختر Custom من السماح القائمة المنسدلة ، ثم أدخل هذه الصيغة: = AND (ISNUMBER (B2)، LEFT (CELL ("format"، B2)، 1) = "D") في المعادلة مربع النص ، انظر لقطة الشاشة:
ملاحظات: في الصيغة أعلاه ، B2 هي الخلية الأولى في العمود التي تريد تقييد تنسيق البيانات.
3. ثم استمر في النقر تنبيه خطأ علامة التبويب في مربع الحوار ، يرجى إجراء العمليات التالية:
(1.) تحقق إظهار تنبيه خطأ بعد إدخال بيانات غير صالحة الخيار.
(2.) تحت الطراز قائمة منسدلة ، يرجى التحديد قلة النوم الخيار.
(3.) اكتب ملف عنوان الاعلان و رسالة خطأ التي تريد عرضها في مربع المطالبة.
4. بعد الانتهاء من الإعدادات ، انقر فوق OK ، والآن ، عند إدخال البيانات التي ليست بتنسيق التاريخ الحقيقي ، سيظهر مربع موجه لتذكيرك كما هو موضح في لقطة الشاشة التالية:
السماح بتنسيق التاريخ فقط في خلايا محددة برمز VBA
الطريقة الثانية ، سأقدم لك رمز VBA.
1. قم بتنشيط ورقة العمل التي تريد استخدامها.
2. ثم انقر بزر الماوس الأيمن فوق علامة تبويب الورقة ، وحدد عرض الرمز من قائمة السياق ، انظر لقطة الشاشة:
3. في العرض ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، انسخ والصق الكود أدناه في ملف وحدة، انظر لقطة الشاشة:
كود فبا: السماح فقط بإدخال تنسيق التاريخ في خلايا معينة:
Private Sub Worksheet_Change(ByVal Target As Range)
'updateby Extendoffice
Set w = ActiveSheet.Range("B2:B12")
For Each c In w
If c.Value <> "" And Not IsDate(c) Then
c.ClearContents
MsgBox "Only a date format is permitted in this cell."
End If
Next c
End Sub
4. ثم احفظ الإعلان ، أغلق الكود ، الآن ، عند إدخال القيمة التي ليست تنسيق التاريخ في النطاق B2: B12 ، سيظهر مربع مطالبة لتذكيرك ، وسيتم مسح قيمة الخلية في نفس الوقت ، انظر لقطة الشاشة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!