محتاج امسح صفوف بشكل متتالى

[coreman]

ارجوكم سرعة الرد فرج الله كرباتكم

انا محتاج امسح صفوف بشكل متتالى مثلا امسح صفين واترك صف , وهذا على الملف بالكامل المكون من 10000 صف :') اريد طريقة لتسهيل هذه العملية , تعمل على الملف بالكامل وجزاكم الله خيرا اجوكم بسرعة عندي مشروع فى الكلية

[هادى محمد المامون سالم]

بسم الله الرحمن الرحيم

Sub sDOIT()
For i = 1 To 10000 Step 3
    Rows(i).Clear
    Rows(i + 1).Clear
Next
End Sub

مرفق ملف

السلام عليكم

Clear.rar

[ابو اسامة العينبوسي]

السلام عليكم

بارك الله في صنيعك