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

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

قام بنشر

السلام عليكم ورحمة الله وبركاته

بعد اذنكم محتاج معادلة بدالة IF اذا تغيرت قيمة الخلية A1 اذا B1=تاريخ اليوم

وشكرا لكم ...ملف مختصر لما اود فعله

New Microsoft Excel Worksheet.xlsx

  • تمت الإجابة
قام بنشر

لا أعتقد أن هذا يتم بمعادلة

يمكنك استعمال هذا الكود في حدث تغيير الشيت

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 And Target.Column < 6 Then Range("f" & Target.Row) = Date
End Sub

كلك يمين على اسم الشيت ثم view code

ثم لصق هذا الكود في الناحية اليمنى

مع حفظ الملف بامتداد يدعم الأكواد مثل xls أو xlsb أو xlsm

بالتوفيق

  • Like 3
  • 3 weeks later...
قام بنشر

تمام يا أ/محمد ...اشتغلت معايا على نفس الامتداد ..

 

 

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

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

Important Information