Note: The other languages of the website are Google-translated. Back to English

احصل على وإدراج الوقت الذي تم إنشاؤه ووقت آخر تعديل في الخلايا

ستتحدث هذه المقالة عن طرق الحصول على الوقت الذي تم إنشاؤه ووقت آخر تعديل لمعلومات المصنف الحالي ، وإدراج الوقت الذي تم إنشاؤه ووقت آخر تعديل لمعلومات المصنف الحالي في الخلايا في Excel.

احصل على وقت الإنشاء ووقت آخر تعديل في Excel باستخدام أمر المعلومات

احصل على الوقت الذي تم إنشاؤه ووقت آخر تعديل في Excel باستخدام وظيفة الخصائص المتقدمة

أدخل الوقت الذي تم إنشاؤه ووقت آخر تعديل في الخلايا في Excel باستخدام رمز VBA

أدخل الوقت الذي تم إنشاؤه وآخر وقت تم تعديله في الخلايا / الرأس / التذييل باستخدام Kutools for Excel فكرة جيدة 3


السهم الأزرق الحق فقاعة احصل على وقت الإنشاء ووقت آخر تعديل في Excel باستخدام أمر المعلومات

يمكننا معرفة وقت الإنشاء الدقيق ووقت آخر تعديل للمصنف الحالي في عرض الكواليس لبرنامج Microsoft Excel 2010/2013.

انقر على قم بتقديم > معلومات، وفي الجانب الأيمن من عرض الكواليس يعرض ملف التواريخ ذات الصلة معلومات. تحت التواريخ ذات الصلة العنوان ، يسرد آخر وقت تم تعديله ووقت الإنشاء ووقت الطباعة الأخير. انظر لقطة الشاشة التالية:

-2

 

ملاحظة: هذه الطريقة متاحة فقط في Microsoft Excel 2010/2013. إنه غير صالح في Excel 2007.


السهم الأزرق الحق فقاعةاحصل على الوقت الذي تم إنشاؤه ووقت آخر تعديل في Excel باستخدام وظيفة الخصائص المتقدمة

في الواقع ، يمكننا الحصول على كل من وقت الإنشاء ووقت آخر تعديل للمصنف الحالي في مربع الحوار خصائص المستند.
الخطوة1: افتح ال خصائص متقدمة صندوق المحادثة:

في Excel 2007 ، انقر فوق ملف مكاتب زر> إعداد > عقارات، و خصائص المستند سيتم عرض شريط أسفل شريط الأدوات ، انقر فوق خصائص المستند > خصائص متقدمة، انظر لقطات الشاشة:

وثيقة-إدراج-تعديل-الوقت -3-3
-1
وثيقة-إدراج-تعديل-الوقت -4-4

 

في Excel 2010/2013 ، انقر فوق قم بتقديم > معلومات > عقارات > خصائص متقدمة.

وثيقة-إدراج-تعديل-الوقت -4-4

الخطوة2: في ال خصائص متقدمة في مربع الحوار ، سترى وقت الإنشاء ووقت آخر تعديل ضمن علامة التبويب الإحصائيات. انظر الصورة التالية:

وثيقة-إدراج-تعديل-الوقت -4-4


السهم الأزرق الحق فقاعة أدخل الوقت الذي تم إنشاؤه ووقت آخر تعديل في الخلايا في Excel باستخدام رمز VBA

ستساعدك وحدات ماكرو VBA التالية في إدراج الوقت الذي تم إنشاؤه ووقت آخر تعديل لمعلومات المصنف الحالي في الخلايا مباشرةً.

أدخل كل من وقت الإنشاء ووقت آخر تعديل في Excel

الخطوة1: اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

الخطوة2: انقر إدراج >> وحدة، ولصق الماكرو التالي في نافذة الوحدة النمطية.

رمز فبا: أدخل كلاً من وقت الإنشاء ووقت آخر تعديل في Excel

Sub Workbook_Open()
Range("A1").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Creation Date"), "short date")
Range("A2").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Last Save Time"), "short date")
End Sub

الخطوة3:اضغط على F5 مفتاح لتشغيل هذا الماكرو. وبعد ذلك سيتم إدراج تاريخ الإنشاء وتاريخ آخر تعديل في الخلية A1 والخلية A2 بشكل منفصل.

ملاحظة: يمكنك تعديل خلية الوجهة في VB وفقًا لاحتياجاتك.

أدخل وقت آخر تعديل في المصنف في Excel

الخطوة1: اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

الخطوة2: انقر إدراج >> وحدة، ولصق الماكرو التالي في نافذة الوحدة النمطية.

Public Function ModDate()
ModDate = Format(FileDateTime(ThisWorkbook.FullName), "m/d/yy h:n ampm")
End Function

الخطوة3: ثم احفظ وأغلق هذا الرمز ، والعودة إلى ورقة العمل ، في خلية فارغة ، أدخل صيغة = ModDate ()، ثم اضغط على أدخل مفتاح. ثم يقوم بإدخال آخر وقت تم تعديله في الخلية.

-2

أدخل وقت إنشاء المصنف في Excel

الخطوة1: اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

الخطوة2: انقر إدراج >> وحدة، ولصق الماكرو التالي في نافذة الوحدة النمطية.

Function CreateDate() As Date
CreateDate = ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
End Function

الخطوة3: احفظ وأغلق هذا الرمز ، عد إلى ورقة العمل ، في خلية فارغة ، أدخل الصيغة = تاريخ الإنشاء ()، ثم اضغط على أدخل key.and سيتم إدخال تاريخ الإنشاء في الخلية كما هو موضح في لقطات الشاشة التالية:

-2

ملاحظة: إذا لم تكن خليتك بتنسيق التاريخ ، فقد تعرض رقمًا غريبًا. ما عليك سوى تنسيق هذه الخلية بتنسيق التاريخ التنسيق ، سيظهر كتاريخ عادي.


السهم الأزرق الحق فقاعة أدخل الوقت الذي تم إنشاؤه وآخر وقت تم تعديله في الخلايا / الرأس / التذييل باستخدام Kutools for Excel

اسمح لي بتقديم أداة مفيدة لك--كوتولس ل إكسيل التي تشمل أكثر من 300 وظيفة مفيدة يمكن أن تعزز كفاءة عملك؟ مع ل أدخل معلومات المصنف وظيفة ، يمكنك إدراج مسار المصنف أو اسم المصنف / ورقة العمل أو اسم المستخدم أو وقت الإنشاء ووقت آخر تعديل بسرعة في الخلايا أو الرأس أو التذييل.

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:

1. انقر كوتولس بلس > مصنف > أدخل معلومات المصنف. انظر لقطة الشاشة:
آخر تعديل doc name2

2. ثم في أدخل معلومات المصنف مربع الحوار ، تحقق من المعلومات التي تريد إدراجها من قسم المعلومات ، ثم انتقل لتحديد الموقع الذي تريد الإدراج فيه ، يمكنك اختيار الخلايا ، التذييل (التذييل الأيسر ، التذييل الأوسط ، التذييل الأيمن) أو الرأس (الرأس الأيسر ، الرأس الأوسط ، الرأس الأيمن). انظر لقطة الشاشة:
تم إنشاء إدراج doc في الوقت المعدل 1

3. انقر Ok، وتم إدراج المعلومات التي تتحقق منها في الموقع الذي تحدده.

تلميح. إذا كنت ترغب في الحصول على نسخة تجريبية مجانية من وظيفة إدراج معلومات المصنف ، يرجى الانتقال إلى تنزيل Kutools for Excel مجانًا اولا ثم انتقل لتطبيق العملية حسب الخطوات اعلاه.

السهم الأزرق الحق فقاعة أدخل معلومات المصنف



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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (21)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
معلومات مفيدة.... :-)
تم تصغير هذا التعليق بواسطة المشرف على الموقع
كان هذا مثاليًا. بالضبط ما كنت أبحث عنه. شكرا جزيلا!!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا للمساعدة ، هذا ما نحتاجه. تعمل الأكواد بشكل صحيح ولكن بدون تحديث ، يعني عدم تحديث تاريخ التعديل بمجرد الحفظ. هل لديك اي حل لهذا؟ حاولت عدة مرات ، حفظ ، أغلق ثم أعد فتحه ، بدون تحديث للتاريخ.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا خالد ،

واجهت نفس المشكلة وأضفت السطر "Application.Volatile" إلى الكود وعندما أضغط على F9 ، سيتم تحديث المعلومات.
رأيته في الفيديو "Learn Excel -" Function for Last Saved Time ": Podcast # 1725" لبيل جيلين.
@ بيل: شكرا جزيلا على الفيديو!

https://www.youtube.com/watch?v=KnSA6xdmc2Q

التحيات،
الاسكندرية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا: لقد فعلت ذلك بطريقة مختلفة ولكن أيضًا عن طريق الترميز. منذ أن أضفت رمزًا ، يجعلني أحفظ المصنف باستخدام وحدات الماكرو وبالتالي كملف * .XLSM. هذا جيد ولكن الكثير من الأماكن لن تسمح بوحدات ماكرو مثل هذا. هل هناك طريقة للحصول على هذا (أو حفظ المصنف مع التغيير) إلى تنسيق XLS عادي؟ أفترض أيضًا أنه سيطلب من شخص ما "تمكين وحدات الماكرو" إذا كان لديهم هذا الإعداد قيد التشغيل (أنا استشاري ومعظم الأماكن التي أعمل فيها تجعلني أقوم بتشغيل وحدات الماكرو عند الاقتضاء بعد فتح مصنف). لمعلوماتك: إليك كيف فعلت ذلك في ماكرو (ليس أفضل ؛ مختلف فقط). Private Sub Workbook_BeforeSave (ByVal SaveAsUI As Boolean، _ Cancel as Boolean) Cancel = False With ActiveSheet.PageSetup '.LeftHeader = "" .CenterHeader = "" .RightHeader = "Last Update" & Format (Now ()، "mm / dd / yyyy ") .RightHeader =" ".RightFooter =" آخر تحديث "والتنسيق (الآن () ،" mm / dd / yyyy ") ينتهي بـ End Sub
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هذه المعلومات مفيدة جدا بالنسبة لي. شكرا للقلق
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا لهذه المعلومات
تم تصغير هذا التعليق بواسطة المشرف على الموقع
[اقتباس] مرحباً: لقد فعلت ذلك بطريقة مختلفة ولكن أيضًا عن طريق الترميز. منذ أن أضفت رمزًا ، يجعلني أحفظ المصنف باستخدام وحدات الماكرو وبالتالي كملف * .XLSM. هذا جيد ولكن الكثير من الأماكن لن تسمح بوحدات ماكرو مثل هذا. هل هناك طريقة للحصول على هذا (أو حفظ المصنف مع التغيير) إلى تنسيق XLS عادي؟ أفترض أيضًا أنه سيطلب من شخص ما "تمكين وحدات الماكرو" إذا كان لديهم هذا الإعداد قيد التشغيل (أنا استشاري ومعظم الأماكن التي أعمل فيها تجعلني أقوم بتشغيل وحدات الماكرو عند الاقتضاء بعد فتح مصنف). لمعلوماتك: إليك كيف فعلت ذلك في ماكرو (ليس أفضل ؛ مختلف فقط). Private Sub Workbook_BeforeSave (ByVal SaveAsUI As Boolean، _ Cancel as Boolean) Cancel = False With ActiveSheet.PageSetup '.LeftHeader = "" .CenterHeader = "" .RightHeader = "Last Update" & Format (Now ()، "mm / dd / yyyy ") .RightHeader =" ".RightFooter =" آخر تحديث "والتنسيق (الآن () ،" mm / dd / yyyy ") ينتهي بـ End Subبواسطة Larry S. Peteet[/ quote] مرحبًا ، لقد نجحت في إدخال تاريخ ووقت آخر تعديل ، لكنه لا يتم تحديثه عند حفظ المصنف وإعادة فتحه. الرجاء المساعدة هنا ...... أنا لا أعرف عن الترميز ، لذلك أنا في الأساس أنسخ أي معلومات معطاة في مثل هذه المنتديات ، شكرًا Swaran
تم تصغير هذا التعليق بواسطة المشرف على الموقع
نعم لدي نفس المشكلة - لقد نجحت تمامًا بالأمس ولكن اليوم لن تتغير عند حفظها.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
الرجاء المساعدة !!! تحتاج إلى إرجاع تاريخ ووقت آخر تعديل لملف مغلق ، وإرجاع هذه المعلومات في خلية في الملف المفتوح
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، كان هذا رائعًا. هل من الممكن إدراج تاريخ الإنشاء وتاريخ آخر تعديل لمصنف مختلف؟ إنني أتطلع إلى إنشاء ملف فهرس يخبرني بآخر تحديث للمستندات الأخرى. شكرًا!!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
Hiya Love أحب هذا ولكن للأسف التاريخ يظهر فقط في الولايات المتحدة الأمريكية وفي أستراليا لدينا dd / mm / yy لقد سئمت تغييره إلى هذا التنسيق باستخدام قسم "التاريخ" ولكن لم يحالفني الحظ. أيه أفكار؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
جولي - في رمز VBA ، استخدم "dd / mm / yy hh: n" بدلاً من ذلك. سيؤدي ذلك إلى وضع التاريخ بالترتيب "الصحيح"! :الضحك بصوت مرتفع:
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا جدا جدا جدا جدا جدا جدا جدا جدا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هل يمكن تعديل هذا لعرض تاريخ الإنشاء لـ آخر ملفات مغلقة؟ أود مقارنة تاريخ إنشاء ملف موجود على سطح المكتب بملف موجود على خادم ويب عام. يمكنني إنشاء الصيغة لاستخدام وظائفك ... CreateDate () من الملف المحلي إلى CreateDate () من ملف الويب ... وتنبيهني إلى التغيير. انا اقدر مساعدتك. بروس
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرًا للمساعدة ، لكنني واجهت أيضًا مشكلة في عدم تحديث الخلية بعد الحفظ دون الحاجة إلى إغلاق المصنف أولاً وإعادة فتحه. لقد أضفت الكود التالي إلى المصنف الذي يتم تحديثه بعد حدث الحفظ: Private Sub Workbook_AfterSave (ByVal Success As Boolean) If Success ثم ActiveSheet.Calculate End If End Sub وهذا فعل الحيلة بالنسبة لي. آمل أن يساعد.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أرى أن "Last Save Time" تتم الإشارة إليه مرة واحدة فقط في الكود. أنا أستخدم Excel 2010. عندما أضع "Last Save Time" في دالة ، حتى مع Application.Volatile (صحيح) ، لا يتم تحديث القيمة أبدًا. ثم لاحظت أن القيمة التي أرجعها "Last Save Time" لا تظهر في صفحة "الخصائص" في Excel 2010 ولا تظهر أيًا من علامات التبويب في مربع حوار "الخصائص المتقدمة". هل يمكن أن يكون "آخر توفير للوقت" بعض الآثار؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لقد تعلمت سبب عدم نجاح "Last Save Time" بالنسبة لي. لقد وضعت وظيفتي في ملف XLA الخاص بي ، وكان "ThisWorkbook" يشير إلى ملف XLA نفسه. لذلك كنت بحاجة إلى الحصول على Application.ActiveWorkbook (من المفترض أن يكون موقع استدعاء الوظيفة) ، ينتهي بـ: Function DocumentProperty (PropertyName As String) '' يمكنك الرجوع إلى خصائص المستند إما عن طريق قيمة الفهرس أو بالاسم. تعرض القائمة التالية أسماء خصائص المستند المضمنة المتاحة: "العنوان ، المؤلف" ، الكلمات الرئيسية ، "قالب التعليقات" ، "رقم المراجعة الأخير للمؤلف ، اسم التطبيق" ، تاريخ الطباعة الأخير ، تاريخ الإنشاء "وقت التوفير الأخير" إجمالي وقت التحرير عدد الصفحات عدد الكلمات "عدد الكلمات فئة أمان الأحرف 'Format Manager Company' عدد البايتات عدد الأسطر عدد الفقرات 'عدد الشرائح عدد الملاحظات عدد الشرائح المخفية' عدد مقاطع الوسائط المتعددة الارتباط التشعبي الأساسي عدد الأحرف (مع مسافات) تطبيق الاستدعاء متغير (صحيح) خافت ActiveUserWorkbook عند الخطأ ، استئناف المجموعة التالية ActiveUserWorkbook = Application.ActiveWorkbook If Err.Number 0 ثم DocumentProperty = "!!! خطأ في الحصول على Application.ActiveWorkbook:" & Err.Description إنهاء وظيفة الخروج إذا DocumentProperty = ActiveUserWorkbook.BuiltinDocumentProperties (PropertyName) 0 ثم DocumentProperty = "!!! اسم خاصية غير معروف !!!" خروج من وظيفة النهاية إذا وظيفة الإنهاء
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا أيها الفريق ، أحتاج إلى مساعدتكم. لدي ملف اكسل ، هناك أريد العثور على التاريخ المعدل لخلية معينة. الرجاء مساعدتي في الترميز هنا ، إذا كان ذلك ممكنًا. شكرا لك مقدما.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أريد إنشاء مسافة تلقائيًا بين كل عميل في Excel كيف أفعل ذلك ؟؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أنا أبحث عنك !!!! TKSSSSSSS
لا توجد تعليقات منشورة هنا حتى الآن

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL