اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

استقسار عن التاريخ والوقت في الاكسل


Srah555
إذهب إلى أفضل إجابة Solved by Ali Mohamed Ali,

الردود الموصى بها

 السلام عليكم 
للخبراء في الاكسل
لدي جدول حابه اضيف له الوقت والتاريخ عند اضافة البيانات 
 وعند التحديث في بيانات اي خليه في الجدول يتم تحديث التاريخ معه للخليه المحدثه فقط بتاريخ ووقت التحديث في البيانات. وليس الجدول كامل
كيف ذلك ؟
ملاحظه :

اتمن ان يكون الشرح ابسط ما يكون لاني مبتدئه في هذا البرنامج 
الاكسل 2016
تمنى ان يكون السؤال واضح ...وشكرا

 

تم تعديل بواسطه Srah555
رابط هذا التعليق
شارك

أهلا وسهلا بك فى منتدانا الكريم من الأفضل ارسال الملف للعمل عليه

ولكن يمكنك وضع هذه المعادلة فى الخلية التى تريدها لإعطاء الوقت والتاريخ الحاليين

=TEXT(TODAY(),"d/m/yyy")&"   "&TEXT(NOW(),"hh:mm:ss")

وهناك ايضا هذا الكود لجعل الوقت يعمل وشغال بأستمرار

Sub Date_Time()
On Error Resume Next
1  DoEvents
N = Now
Range("c13") = Format(N, "[$-F400]h:mm:ss AM/PM")
T = T + 1
For r = 1 To 10000000: Next r
GoTo 1
End Sub 

وهذا كود اخر يمكنك اضافته فى حدث الورقة بحيث اذا قمت بتسجيل اى شيء فى العمود B سيضهر لك التاريخ فى العمود C

والوقت فى العمود D



Private Sub Worksheet_Change(ByVal Target As Range)
n = Now
If Target.Column = 2 Then
If Target = "" Then
Cells(Target.Row, Target.Column + 1) = ""
Cells(Target.Row, Target.Column + 2) = ""
 Exit Sub
ElseIf Target <> "" Then
Cells(Target.Row, Target.Column + 1) = Date
Cells(Target.Row, Target.Column + 2) = Time
End If
End If
End Sub
  

بارك الله فيك

تم تعديل بواسطه ali mohamed ali
  • Like 2
رابط هذا التعليق
شارك

جزاك الله كل خير

الملف يحتوي على معلومات خاصه لذلك صعب ارفاقه

اخي الكريم

هل توضح كيفية اضافة الاكواد الكبيره 

الاول مفهوم ام الباقي ياريت اتوضح 

لك من كل الشكر والتقدير 

رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information