skyblue قام بنشر مارس 1, 2005 قام بنشر مارس 1, 2005 السلام عليكم ورحمة الله وبركاته اخواني الافاضل عندي برنامج لتسجيل القيود المالية عملته بنفسي فاسجل عليه مجموعة من القيود المالية وعند الانتهاء من قيود هذا اليوم اقوم بحفظها ,ففي اليوم التالي عندي قيود اخرى اريد ان اسجلها على نفس الصفحة مما اضطر الى مسح البيانات السابقة عن طريق التضليل ثم المسح وهذه الطريق تؤدي الى مسح بعض المعادلات احيانا واحيانا الى مسح المجاميع ومشاكل اخرى فسؤالي هو : ماهي طريقة وضع كود برمجي يؤدي الى مسح تلك البيانات ( تصفير االشاشة من البيانات ) وتقبلوا تحياتي :)
محمد حجازي قام بنشر مارس 1, 2005 قام بنشر مارس 1, 2005 السلام عليكم ... الكود في غاية البساطة ، فقط ضع المجال الذي تريده في الكود التالي: Sub ClearCells() Sheets("Sheet1").Range("---ضع المجال هنا---").ClearContents End Sub وانتبه إلى استخدام الفاصلة العادية في كتابة المجالات وليس الفاصلة المنقوطة ، مثال: Sub ClearCells() Sheets("Sheet1").Range("A1:D5,E10,F5,G1:G4").ClearContents End Sub
الردود الموصى بها