اذهب الي المحتوي
أوفيسنا

هل هناك طريقة لمعرفة تاريخ تسجيل قيمة بخلية


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

السلام عليكم اخي الكريم

يمكن ذلك من خلال تشغيل تعقب التغيرات

من تبويب مراجعة تختار تعقب التغيرات

وتختار النطاق الذي تريد متابعته

وهكذا يعطيك العديد من المعلومات

منها ساعة التحرير والقيمة السابقة واسم الجهاز الذي تم التعديل عليه

 

وهذا فيديو لي سبق نشره على اليوتيوب يتحدث عن هذا الموضوع :

 

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

بالطبع هناك طرق لذلك أخى الحبيب " أحمد "

ومنهم الفيديو الرائع لأخى " محمد "

وبصراحة كنت أتمنى يكون لى المقدرة والجرأة لعمل مثل هذه الفيديوهات ، ولكن للأسف ليس لدى الموهبة للشرح أمام تسجيل

ومنهم هذه الطريقة عن طريق الكود التالى :

ومرة ثانية يتم دفعى للكود على العموم أرجو أن يكون به الإفادة للجميع

تقبلوا تحياتى

تعقب تسجيل تاريخ التغييرات التى تطرأ على خلية.rar

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

وهذا أيضا أخى مع التحكم فى حجم التعليق سواء " عرضا أو طولا "

وشكرا على هذه الكلمات التى تفوقنى بكثير أخى

لايمكن أحد يعلو على أساتذتنا فى الأكواد وعلى رأسهم أستاذى ومعلمى " عبد الله بقشير "

وإنما هى محاولة التجريب والحمد لله إننى وفقت فيها

تقبل تحيات : أخيك

تسجيل التغير الذى يطرأ على خلية مع التحكم فى حجم التعليق.rar

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

جزاكم الله خيرا استاذنا / ابو محمود ... تمت التجربة وتغيير حجم التعليق طولا وارتفاعا بنجاح

ولكن حجم الخط يظل ثابتا 

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

شكر الله لك وزادك علما وتواضعا على علمك وتواضعك

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

السلام عليكم

اخى الحبيب محمد نصرى بارك الله فيك وزاد من امثالك وجزاك الله خير . واسال الله ان يجعل اعمالك فى ميزان حسناتك

اخى واستاذى الحبيب جمال عبدالسميع جزاكم الله خيرا على الاكواد المبتكره منكم واسال الله ان يزيدك وان يجعل اعمالك فى ميزان حسناتك

واطمع منك فى شرح الكود وشرح كيفية عمله .

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

أخى الحبيب " محمد الريفى "

أولا - شكرا على مرورك الكريم ، وكلماتك الرائعة

ثانيا - الكود بسيط للغاية ، حيث يتم وضعة فى حدث الصفحة بدون أزرار ، وهو يعتمد على عمل "add " لل " comment "

ثالثا - بدأت بعد ذلك فى تحديد مواصفاتة ، عن طريق

1- تحديد مداه

 If Not Intersect(Target, Target.Worksheet.Range("A1:A1000")) Is Nothing Then
If Not Target.Comment Is Nothing Then

2- ثم بدأت بعد ذلك فى وضع محتواه وهى دالة " now "

3- ثم بدأت بتنسيقها " كتاريخ وزمن "

Target.Comment.Text Format(Now(), "yyyy/mm/dd hh:mm:ss PM/AM")

4- والخطوة الأخيرة هى وضع تنسيق لل " comment " نفسة من حيث التحكم فى " عرضة وطولة ، ليسهل التحكم فى حجمة الملائم لعملية الظهور

Target.Comment.Shape.Height = 12
 Target.Comment.Shape.Width = 75 

وهذا هو الكود بالكامل ، أتمنى أن أكون وفقت فى توضيحة

Private Sub Worksheet_Change(ByVal Target As Range)
'GAMAL ABD ELSAMEH 22/8/2014
    If Not Intersect(Target, Target.Worksheet.Range("A1:A1000")) Is Nothing Then
        If Not Target.Comment Is Nothing Then
        Target.Comment.Text Format(Now(), "dd/mm/yyyy hh:mm:ss AM/PM")
        Target.Comment.Shape.Height = 20
        Target.Comment.Shape.Width = 75
        Else
        Target.AddComment Format(Now(), "dd/mm/yyyy hh:mm:ss AM/PM")
        Target.Comment.Shape.Height = 20
        Target.Comment.Shape.Width = 75
        End If
    End If
End Sub

تقبل تحيات : أخيك

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

 

السلام عليكم

اخى الحبيب محمد نصرى بارك الله فيك وزاد من امثالك وجزاك الله خير . واسال الله ان يجعل اعمالك فى ميزان حسناتك

اخى واستاذى الحبيب جمال عبدالسميع جزاكم الله خيرا على الاكواد المبتكره منكم واسال الله ان يزيدك وان يجعل اعمالك فى ميزان حسناتك

واطمع منك فى شرح الكود وشرح كيفية عمله .

 

وإياكم اخي الله يبارك بعمرك وعملك ويسلمك يا أحلى أخ

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

استاذى الحبيب جمال عبدالسميع

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

واسال الله العلى العظيم ان يجعل اعمالكم شفيعا لكم يوم القيامه

تقبل خالص تحياتى واحترامى

تلميذك // محمد الريفى

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

أخى الحبيب // الأستاذ أحمد الحاوى

 

وبعد إذن أساتذتى الكرام 

 

الأستاذ القدير // جمال عبد السميع

الأستاذ الكريم // محمد نصرى

 

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

بالملف الأصلى

بإفتراض أنكم لديكم جدول كامل مكون من 21 عمود

وترغبون فى معرفة وتتبع التغيرات أو الإدخالات الجديده بخلايا الجدول

وبنفس الوقت لا ترغبون فى أن يطلع أحد غيركم على تتبع هذه التغيرات

فهناك طريقة لذلك بتتبع التغيرات بملف آخر ولكن بشرط أن يوضع الملفين ( الأصلى والملف الآخر الخاص بالتتبع كلاهما بمجلد واحد )

كما بالمرفقات

 

وتقبلوا منى وافر الإحترام والتقدير

 

 

المتابعة.rar

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

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.

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

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

Important Information