Блок-оператори за повторение (loops): For ... Next

Q: Как да изтрия ред при определени условия?

Здравейте, когато се изтриват редове е по-добре изтриването да става от последния към първия ред на таблицата. Например, имате 200 реда в таблицата, в които имате 100 реда, които трябва да се изтрият. Започвате от първия ред, изтривате реда. Определили сте цикъла да се изпълнява 200 пъти, а след изтриването в таблицата вече има 199 реда, т.е. цикъла ще се изпълнява и за вече празни редове, което е причина за бавното изпълнение - 4000 реда! Решението е (използвам кода на Ева): Public Sub DeLL_nula() Dim i As Integer Dim row_last As Long row_last = Range("C2").CurrentRegion.Rows.Count For i = row_last To 2 Step -1 If Cells(i, 10) = 0 And Cells(i, 17) = 0 Then Range(Cells(i, 1), Cells(i, 31)).Delete End If Next i End Sub Надявам се, че успях да помогна.

Q: кое е идникатора за колони и редове?

Здравейте, Детелина! Обект Cells има 2 аргумента. Първият определя индекса на реда, а вторият - индекса на колоната. В блок-оператора With използвам обект Cells, в който индекса за реда и колоната се съхраняват в променливите row_x и col_x от 2-та блок-оператора For. Ако имате въпроси, моля пишете.