Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Удаление случайных строк по условию и при открытии файла - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Удаление случайных строк по условию и при открытии файла
lFJl Дата: Вторник, 13.10.2015, 16:43 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 236
Репутация: 6 ±
Замечаний: 0% ±

Excel 2013
Доброго дня коллеги!
Очень мало времени, срочно нужен макрос!
файл примера накидал.

Нужно при открытии(или закрытии) файла удалить одну из строк(случайную), если значение в столбце 3 будет равно "Да", и скрыто под фильтром.

Помогите пожалуйста, очень нужно!
К сообщению приложен файл: 6295639.xlsm (9.9 Kb)
 
Ответить
СообщениеДоброго дня коллеги!
Очень мало времени, срочно нужен макрос!
файл примера накидал.

Нужно при открытии(или закрытии) файла удалить одну из строк(случайную), если значение в столбце 3 будет равно "Да", и скрыто под фильтром.

Помогите пожалуйста, очень нужно!

Автор - lFJl
Дата добавления - 13.10.2015 в 16:43
Rioran Дата: Вторник, 13.10.2015, 17:10 | Сообщение № 2
Группа: Авторы
Ранг: Ветеран
Сообщений: 903
Репутация: 290 ±
Замечаний: 0% ±

Excel 2013
lFJl, здравствуйте.

Помогите пожалуйста, очень нужно!

С удовольствием. Вам потребуется:

1). Найти, где в Excel лежит редактор VBA.
2). Найти, где в этом редакторе модуль книги.
3). Узнайте, как реагировать на события книги: открытие или закрытие. Там фишка в названии макроса.
4). Значение конкретной ячейки можно получить так: Thisworkbook.Worksheets("Название листа").Range("C2").Value
5). Чтобы проверить, удовлетворяет ли значение чему-то, стоит загуглить "Excel VBA оператор IF".
6). Стоит узнать как определить последнюю строку таблицы, чтобы знать в каком диапазоне удалять строку.
7). Для получения случайного числа от 1 до 10 можно взять: Application.WorksheetFunction.RandBetween(1, 10)
8). Для удаления конкретной строки можно использовать ThisWorkbook.Worksheets("Название Листа").Rows("Номер Строки").Delete
9). ??? смешать полученные знания ???
10). Победа.

Ориентировочно это займёт у Вас от 20 минут, если нет опыта программирования. Если будут вопросы по узким частным моментам - добро пожаловать.


Роман, Москва, voronov_rv@mail.ru
Яндекс-Деньги: 41001312674279
 
Ответить
СообщениеlFJl, здравствуйте.

Помогите пожалуйста, очень нужно!

С удовольствием. Вам потребуется:

1). Найти, где в Excel лежит редактор VBA.
2). Найти, где в этом редакторе модуль книги.
3). Узнайте, как реагировать на события книги: открытие или закрытие. Там фишка в названии макроса.
4). Значение конкретной ячейки можно получить так: Thisworkbook.Worksheets("Название листа").Range("C2").Value
5). Чтобы проверить, удовлетворяет ли значение чему-то, стоит загуглить "Excel VBA оператор IF".
6). Стоит узнать как определить последнюю строку таблицы, чтобы знать в каком диапазоне удалять строку.
7). Для получения случайного числа от 1 до 10 можно взять: Application.WorksheetFunction.RandBetween(1, 10)
8). Для удаления конкретной строки можно использовать ThisWorkbook.Worksheets("Название Листа").Rows("Номер Строки").Delete
9). ??? смешать полученные знания ???
10). Победа.

Ориентировочно это займёт у Вас от 20 минут, если нет опыта программирования. Если будут вопросы по узким частным моментам - добро пожаловать.

Автор - Rioran
Дата добавления - 13.10.2015 в 17:10
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!