اذهب الي المحتوي

بحث مخصص من جوجل فى أوفيسنا

Custom Search

استفسار عن جلب بيانات اخر عمليه حفظ تتم

بواسطه ابو ايسل
أكتوبر 10, 2019 في منتدى الاكسيل Excel

https://www.officena.net/ib/topic/96525-%D8%A7%D8%B3%D8%AA%D9%81%D8%B3%D8%A7%D8%B1-%D8%B9%D9%86-%D8%AC%D9%84%D8%A8-%D8%A8%D9%8A%D8%A7%D9%86%D8%A7%D8%AA-%D8%A7%D8%AE%D8%B1-%D8%B9%D9%85%D9%84%D9%8A%D9%87-%D8%AD%D9%81%D8%B8-%D8%AA%D8%AA%D9%85/

متابعين 0

إذهب إلى أفضل إجابة Solved by حسين مامون, أكتوبر 10, 2019

اضف رد علي هذا الموضوع
أضف موضوع جديد

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

ابو ايسل

قام بنشر أكتوبر 10, 2019

قام بنشر أكتوبر 10, 2019

السلام عليكم

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

لماذا تقوم برفع ملف مشفر به الأكواد كيف يتم وضع الكود لتجربته ؟!!!!!

مثال للمطلوب.xlsm

أفضل إجابة

حسين مامون

قام بنشر أكتوبر 10, 2019

أفضل إجابة

قام بنشر أكتوبر 10, 2019

ضع الكود في حدث اغلاق الملف

Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Sheets("main")
.[d3] = Val(.[d3]) + 1
.[d4] = Format(Now(), "dd-mm-yyyy hh:mm:ss")
End With
End Sub

1

ابو ايسل

قام بنشر أكتوبر 13, 2019

الكاتب

قام بنشر أكتوبر 13, 2019

شكرا اخي حسين هو ده المطلوب

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر

اضف رد علي هذا الموضوع....

× Pasted as rich text. Paste as plain text instead

Only 75 emoji are allowed.

× Your link has been automatically embedded. Display as a link instead

× Your previous content has been restored. Clear editor

× You cannot paste images directly. Upload or insert images from URL.

اضف صوره من رابط خارجي

×

https://www.officena.net/ib/topic/96525-%D8%A7%D8%B3%D8%AA%D9%81%D8%B3%D8%A7%D8%B1-%D8%B9%D9%86-%D8%AC%D9%84%D8%A8-%D8%A8%D9%8A%D8%A7%D9%86%D8%A7%D8%AA-%D8%A7%D8%AE%D8%B1-%D8%B9%D9%85%D9%84%D9%8A%D9%87-%D8%AD%D9%81%D8%B8-%D8%AA%D8%AA%D9%85/

متابعين 0

الذهاب الي قائمه المواضيع

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

×

×

اضف...

Important Information

I accept