Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Удалить по условию по средствам VBA / 6 сообщений из 6, страница 1 из 1
25.07.2013, 19:37
    #38344272
ObSerB
ObSerB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
Столбцы с q по z нужно очистить ячейки по условию "больше 0 удалить"
Очень нужно по средствам vba.
Заранее благодарен!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.07.2013, 20:35
    #38344332
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
ObSerB,

подстраивайте под себя: Как удалить строки по условию?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.07.2013, 05:54
    #38344557
ObSerB
ObSerB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
The_Prist,

Помогите подставить значения??
Нужно удалить больше 0
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.07.2013, 06:09
    #38344560
ObSerB
ObSerB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
И нужно не удалять строчку, а просто очищать ячейки в которых больше 0
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.07.2013, 09:44
    #38344675
Maxim12345678
Maxim12345678
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
ObSerB,

ну так используйте ClearContents для очистки ячеек. Вам уже и ссылку дали. Условия задайте через цикл или еще как-нибудь. В чем проблема?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.08.2013, 19:15
    #38353533
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Удалить по условию по средствам VBA
Код: xml
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
sub ochistka ()

For n=1 to 100

If range("A" & n).Value> 0 then 'если А n-ая яйчейка больше нуля
Range ("A" & n).value=0 ' то обнулить или Range ("A" & n).value="" очистить 
end if

next n

End sub


Так нормально
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Удалить по условию по средствам VBA / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 1447ms
Закрыть
start [/forum/search_topic.php?author=zvuk&author_mode=last_topics&do_search=1]:
 0ms
get settings:
 9ms
get forum list:
 15ms
get settings:
 14ms
get forum list:
 13ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 30ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 1ms
others: 1264ms
total:  1447ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]