Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.02.2009, 11:55   #1
Рома_Чайник
 
Регистрация: 11.02.2009
Сообщений: 5
По умолчанию Как удалять ячейки с помощью VBA

У меня есть база в Excel в которой указано работники: ПИФ работников, их оклад, посада, дата приходу на работу и если уволен, то дата увольнения.
в базе им начисляется з/п. мне нужно удалять работника которого уволили с помощью VBA.
как это сделать? или как удалять ячейки с помощью VBA?
Рома_Чайник вне форума Ответить с цитированием
Старый 11.02.2009, 12:55   #2
Юнлинг
Форумчанин
 
Регистрация: 17.10.2008
Сообщений: 239
По умолчанию

Цитата:
Сообщение от Рома_Чайник Посмотреть сообщение
У меня есть база в Excel в которой указано работники: ПИФ работников, их оклад, посада, дата приходу на работу и если уволен, то дата увольнения.
в базе им начисляется з/п. мне нужно удалять работника которого уволили с помощью VBA.
как это сделать? или как удалять ячейки с помощью VBA?
Подобная задача недавно обсуждалась здесь
Код:
удаление строки по критерию
А если это нексолько файлов то выложите Таблицу
Юнлинг вне форума Ответить с цитированием
Старый 11.02.2009, 13:23   #3
Рома_Чайник
 
Регистрация: 11.02.2009
Сообщений: 5
По умолчанию

Спасибо!
Но эту тему я уже просматривал...
Рома_Чайник вне форума Ответить с цитированием
Старый 11.02.2009, 14:14   #4
Юнлинг
Форумчанин
 
Регистрация: 17.10.2008
Сообщений: 239
По умолчанию

Цитата:
Сообщение от Рома_Чайник Посмотреть сообщение
Спасибо!
Но эту тему я уже просматривал...
Если не помогло посмотри здесь
Нужно только не много подкоректировать макрос примерно так
Код:
Sub test()
    Set Sheet = ActiveSheet ' объект Sheet - это обрабатываемый лист Excel
    For Each Row In Sheet.UsedRange.Rows
        If not isNull(Row.Cells(1)) Then Row.Delete
    Next
End Sub
Юнлинг вне форума Ответить с цитированием
Старый 16.02.2009, 11:31   #5
Рома_Чайник
 
Регистрация: 11.02.2009
Сообщений: 5
По умолчанию

Спасибо, вроде работает
Рома_Чайник вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление строк с помощью VBA risen Microsoft Office Excel 4 28.01.2009 09:28
Скрыть-Отобразить с помощью VBA ZORRO2005 Microsoft Office Excel 5 01.09.2008 09:11
Сверка данных с помощью VBA mal001 Microsoft Office Excel 2 06.08.2008 14:39
защита ячейки в VBA tat-besidovska Microsoft Office Excel 4 06.02.2008 04:57
Как удалять элементы массива в Паскале? Антонова Анна Помощь студентам 2 08.12.2007 17:01