| |
|
|
| | Доброго времени суток!
В файлике Excel есть таблица долгов, куда данные выгружаются машиной совсем в другом месте и ко мне приходят по электронке. Проблема в том, что по должникам сортировки у неё нет никакой - т.е. лепит вообще всех клиентов подряд - и тех, кто должен на самом деле, и тех, у кого долг "0" и тех у кого переплата. Всё бы ничего, но клиентов уж больно много. Всех каждый раз вручную "лопатить" - тоскливо совсем.
Подскажите плз, как удалить строку в Excel, если в соотв. ячейке (столбце) по этой строке значение = "0" или "<0"? Проще говоря, как запустить цикл проверки значений из соотв. ячеек?
Где что-то подобное почитать? Макрос пробовал сам "корябать" - затор.
Заранее спасибо всем, кто откликнется... | |
| |
| |
| |
|
|
| | а зачем "лопатить"?
автофильтр и все ))) | |
| |
| |
| |
|
|
| | Не годится автофильтр.
Автофильтром строки только скрывает и если их потом скопировать в другое место (а мне нужно именно так) - то копирует все - и скрытые и нет. Надо поудалять. | |
| |
| |
| |
|
|
| | автофильтром выбираете по условию что вам нужно и удаляете
макрос можно записать такой
все работает очень быстро | |
| |
| |
| |
|
|
| | если внутри Excel, то как-то так
Dim lngRow As Long
lngRow = 1
Do While Cells(lngRow, 2) <> ""
If Cells(lngRow, 2) <= 0 Then
Call Rows(lngRow).Delete
Else
lngRow = lngRow + 1
End If
Loop
|
Если из Aсcess, то логичнее сделать запрос на удаление | |
| |
| |
| |
|
|
| | Спасибо большое.
Про запрос на удаление - мысль, по честному, была. Но делать это всё (по крайней мере пока) надо вчистую под Excel-ем - так что наверное конвертировать файл в Access, чтобы поудалять строки, а потом конвертировать обратно - не очень правильно было бы.
А с кодом внутри Excel - сейчас попробую.  | |
| |
| |
| |
|
|
| | ненадо ничего конвертировать
используйте лист Excel в ACCESS как связанную таблицу | |
| |
| |
