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

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

قام بنشر

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

اخواني الافاضل عندي برنامج لتسجيل القيود المالية عملته بنفسي فاسجل عليه مجموعة من القيود المالية وعند الانتهاء من قيود هذا اليوم اقوم بحفظها ,ففي اليوم التالي عندي قيود اخرى اريد ان اسجلها على نفس الصفحة مما اضطر الى مسح البيانات السابقة عن طريق التضليل ثم المسح وهذه الطريق تؤدي الى مسح بعض المعادلات احيانا واحيانا الى مسح المجاميع ومشاكل اخرى فسؤالي هو :

ماهي طريقة وضع كود برمجي يؤدي الى مسح تلك البيانات ( تصفير االشاشة من البيانات )

وتقبلوا تحياتي :)

قام بنشر

السلام عليكم ...

الكود في غاية البساطة ، فقط ضع المجال الذي تريده في الكود التالي:

Sub ClearCells()
  Sheets("Sheet1").Range("---ضع المجال هنا---").ClearContents
End Sub
وانتبه إلى استخدام الفاصلة العادية في كتابة المجالات وليس الفاصلة المنقوطة ، مثال:
Sub ClearCells()
  Sheets("Sheet1").Range("A1:D5,E10,F5,G1:G4").ClearContents
End Sub

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

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

Important Information