سلام
من میخوام سلول های اکسلم به صورت 3 در میان حذف بشن میشه کسی راهنماییم کنه؟
من میخوام سلول های اکسلم به صورت 3 در میان حذف بشن میشه کسی راهنماییم کنه؟
Dim c As Range
For Each c In Sheet1.Range("a1:a100")
If c.Value Mod 3 = 0 Then
c.Rows.Delete shift:=xlUp
End If
Next c
کامنت