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

كود لمعرفة اخر تاريخ انشاء تقرير عملاء مثلا


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

السلام عليكم

الاخ الكريم / wzacc214

طلبك غير واضح بعض الشئ برجاء ارفاق ملف ليتم العمل عليه ويوضح الطلب اكثر

واليك كود من اعمال الاستاذ / عبد الله المجرب

لمعرفة آخر تاريخ ادخال في الخلية عسي ان ينفع معك لتستخدمه وتطوعة لطلبك


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

	 If Not Intersect(Target, Range("a1:a1000")) Is Nothing Then

	 VBA.Calendar = vbCalGreg

	 If IsEmpty(Target) Then

		 Target(1, 2).ClearContents

Else

		 With Target(1, 2)

			 .Value = Date

			 .EntireColumn.AutoFit

		 End With

	 End If

End If

End Sub


Book1.rar

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

بعد إذن أخى ( حمادة ) أستعمل معادلة الصفيف هذه للحصول على أخر تاريخ قمت بكتابتة ربما يحقق المطلوب

أو أرفق ملف وأشرح به المطلوب

أخر تاريخ.rar

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

المقصود عندي ملف بة كشف عملاء ومن حين لاخر اقوم بعمل تقرير باخر تحديث لكشف العملاء كل علي حده واريد طريقة لمعرفة اخر تاريخ قمت بعمل تحديث لكشف العميل xx مثلا

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

السلام عليكم

ارفق الملف الذي تعمل عليه

الاليه عند النقر على انشاء تقرير

نظيف تاريخ في خليه معينه

بحيث نستدعي قيمة الخليه فيوقت اردت معرفة اخر مرة ضغطت على زر التقرير

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

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information