Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
удаление строк по условию
 
Написала самостоятельно макрос удаляющий строки по двум условиям (начиная с 6 строки: второй и пятый столбец если равно 0 то удалить строку полностью). Но не работает, в чем ошиблась? буду благодарна

Код
[LEFT]Sub mmm() 
 Set Sht = Application.ActiveWorkbook.ActiveSheet 
 Dim i As Integer 
 i = 6 
For i = 6 To 1400 
If Cells(i, 2).Value = 0 And Cells(i, 5).Value = 0 Then 
Call Rows(i).Delete 

Else 
i = i + 1 
End If 
Next 
End Sub[/LEFT]
Изменено: tolkyna - 26.06.2014 13:23:50
[ Закрыто] в чем ошибка помогите форумчане, удаление строк по условиям
 
Написала самостоятельно макрос удаляющий строки по двум условиям (начиная с 6 строки: второй и пятый столбец если равно 0 то удалить строку полностью). Но не работает, в чем ошиблась? буду благодарна

Sub mmm()
Set Sht = Application.ActiveWorkbook.ActiveSheet
Dim i As Integer
i = 6
For i = 6 To 1400
   If Cells(i, 2).Value = 0 And Cells(i, 5).Value = 0 Then
       Call Rows(i).Delete
   
   Else
   i = i + 1
End If
Next
End Sub
определение адресов ячеек в используемом диапазоне
 
Добрый день всем форумчанам! такая проблемка у меня: нужно вывести на двух строчках адреса (адрес первой ячейки и последней) заполненного диапазона. И нужно чтоб для каждого столбца определить с какой ячейки начинается заполнение и по какое, то есть адрес первой и последней заполненных ячеек . Помогите плиз?
Изменено: tolkyna - 03.06.2014 12:17:04
Суммировать по четным строкам при заданных условиях
 
Добрый день форумчане. Помогите мне пожалуйста с макросом со сложным суммированием. На одном листе данные клиента, например: возраст. На втором листе по возрастной категории суммы. Так вот, макрос должен сперва найти возраст соответствующего клиента в первом листе, затем просуммировать каждые два года( то есть если возраст клиента 25, то суммирование начнется по суммам с 27,29,31.... до 55 лет)
Буду благодарна очень!
Страницы: 1
Loading...