كيفية إدخال التاريخ تلقائيًا عند إدخال البيانات في عمود؟
عند العمل على ورقة عمل ، فأنت تريد إدخال التاريخ والوقت الحاليين في العمود B تلقائيًا عند إدخال البيانات في العمود A كما هو موضح في لقطة الشاشة التالية. في Excel ، كيف يمكنك محاولة حل هذه المهمة بحل سهل وسريع؟
أدخل التاريخ تلقائيًا عند إدخال البيانات في عمود برمز VBA
ربما ، لا توجد طريقة مباشرة لنا للتعامل مع هذه الوظيفة في Excel ، ولكن ، يمكن أن يساعدك رمز VBA التالي ، يرجى القيام بما يلي:
1. حدد علامة تبويب الورقة التي تريد إدراج التاريخ تلقائيًا ، ثم انقر بزر الماوس الأيمن عليها ، واختر عرض الرمز من قائمة النص ، ثم خرج في إيه ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، يرجى نسخ ولصق الكود التالي في الوحدة النمطية:
رمز فبا: أدخل التاريخ تلقائيًا عند إدخال البيانات في عمود آخر:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A2:A15")) Is Nothing Then
With Target(1, 2)
.Value = Date & " " & Time
.EntireColumn.AutoFit
End With
End If
End Sub
2. ثم احفظ وأغلق نافذة الكود هذه ، ارجع إلى ورقة العمل ، الآن ، عند إدخال البيانات في العمود A ، ستدخل الخلية المقابلة في العمود B التاريخ والوقت الحاليين تلقائيًا مرة واحدة.
ملاحظات: في الكود أعلاه ، A2: A15 هي الخلايا التي تريد إدخال القيم فيها.
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!