اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
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