VBA удаление записей
Формулировка задачи:
Итак, предположим есть таблица с товарами, нужно сделать возможным удалить сведения о товарах, проданных в течение заданного сезона (например, зимой).
Решение задачи: «VBA удаление записей»
textual
Листинг программы
i = 2
If OptionButton1 Then
Do Until Cells(i, 5).Text = ""
If Month(Cells(i, 5)) <= 2 Or Month(Cells(i, 5)) = 12 Then
Rows(i).Delete
Else
i = i + 1
End IF
Loop
End If