| Вопрос: Удаление строки, если она пуста во всех столбца. | Добавлено: 07.11.07 22:05 |
Автор вопроса:  alximix
|
| Помогите пожалуйта написать макрос на удаление строки, если эта строка будет пуста во всех столбца, а если хоть в одном столбце(из первой строчки, например) есть данные чтоб он её не трогал. Т.Е. короче он должен проверять первую строку, во всех столбца, потом вторую во всех, и если хоть в одном столбце имеется значение чтоб не трогал, а если строка полностью пуста чтоб тогда только удалял. Спасибо!!! заранее, я просто уже обыскался. уже есть кое какие макросы, но они почему то проверяют все по одному столбцу, а как диапазон задать я так и не понел, спасибо, помогите кто знает. |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 07.11.07 22:20 |
| Excel что-ли? | ||
|
Номер ответа: 2 Автор ответа: alximix Вопросов: 1 Ответов: 2 |
Профиль | | #2 | Добавлено: 07.11.07 22:30 |
| угу он самый) | ||
|
Номер ответа: 3 Автор ответа: GenyaA Вопросов: 0 Ответов: 185 |
Web-сайт: Профиль | | #3 | Добавлено: 08.11.07 10:40 |
|
Set ws = ActiveSheet 'для активного листа
For i = ws.UsedRange.Rows.Count To 1 Step -1 If WorksheetFunction.CountA(ws.Rows(i)) = 0 Then ws.Rows(i).Delete Next i |
||
|
Номер ответа: 4 Автор ответа: alximixВопросов: 1 Ответов: 2 |
Профиль | | #4 | Добавлено: 08.11.07 22:19 |
огромное спасибо, это очень помогло 
|
||
Страница: 1 |