عند مسح الخلايا هل يمكن ات تحتوي على اصفار

[skyblue]

الاخوة المشرفين هل يمكن ان تحتوي الخلايا على اصفار بعد المسح

مرفق ملف

[mojahedxp]

اتعشم ان تكون اجابتى كما تريد وتلقى منك القبول باذن الله تعالى

Book2.rar

[علي السحيب]

الكود التالي ينفذ ما طلبت:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim MyRange As Range
Dim Cell As Range

Set MyRange = [D5:E11]
For Each Cell In MyRange
If Cell = "" Then Cell = 0
Next Cell

End Sub

__________________________________________.rar

[mojahedxp]

هكذا تكون الخبرة التى تصنع فارقا حقيقيا جوهريا

مشكور اخى على الاضافة والتى استفدت انا منها واتمنى ان يستفيد الجميع ايضا