Помогите написать макрос - Microsoft Office Excel - Страница 2

IgorGO · 27.11.2014, 18:57

pashulka, причина сарказма обьяснена в следующем сообщении.

и относится это не к Вашим сообщениям, а к постановке задачи.
гарантий тут нет, автор темы гарантий не выдает.

при начальной постановке задачи активной может оказаться ячейка на 14-м листе, содержащая формулу, которую автор писал 3 дня, собирая по по крохам информацию с 4-х форумов, а когда закрывал файл, оставил курсор в этой ячейке, а тут файл открылся и... вместо этой формулы "27 чт" и радости автора нет пределов, механизм - то работает!!!

cheyan · 27.11.2014, 19:02

Новый рассказ выглядит так:
на листе (макрос сам запускается при открытии книги), в ячейке которую выделил после открытия, только столбца "А" автоматически прописывается дата на текущий день в виде "27 чт", все записанное сохраняется.
Заранее спасибо.

pashulka · 27.11.2014, 19:09

P.S. Если клик правой кнопкой мышки уже не катит, и нужно действительно выделение ячейки, то замените вышеуказанное событие на Worksheet_SelectionChange (см. пример)

IgorGO · 27.11.2014, 19:14

а) чтобы записать "сегодня" в ячейку - не обязательно ее выделять
б) чтобы записать "сегодня" в определенную ячейку - надо описать алгорит по которому определяется нужная ячейка
в) чтобы записать "сегодня" в выделенную ячнйку, я Вам сообщением выше описал какая ячейка будет выделенной при открытии файла и что может получиться в итоге, если выделенная ячейка не пустая может не стоит в нее ничего писать, чтобы не удалить нужную информацию?

cheyan · 27.11.2014, 19:33

спасибо пока работает как надо...

cheyan · 28.11.2014, 18:42

Все работает, установил событие Worksheet_SelectionChange(ByVal Target As Range), убрал ThisWorkbook.Save
- не совсем понадобилось...
А можно ли усложнить задачу - лист в книге это в общем состав дней месяца, с именем текущего месяца в виде
"Ноябрь 2014".
Требуется - когда в ячейке (или нескольких) столбца А прописан последний день календаря например "30 вс", при закрытии и сохранении книги (типа - день кончился), скопировался новый лист с именем следующего месяца, также скопировался на него полностью макрос. При последующем открытии книги, открылось бы на новом листе...?
Заранее спасибо.

pashulka · 28.11.2014, 18:59

Смотрите, сегодня 28-ноября и этот день не последний в этом месяце, 29 и 30 выходные и если Вы не выйдете на работу 30-го, то 1-декабря нового листа Вам не видать

Это я к тому, что можно поступить проще, а именно - при открытии книги проверять наличии листа с именем, совпадающим с текущим месяцем (и годом, если он также актуален) и в случае его отсутствия - создавать его.

А поводу копирования события листа - это излишнее, ибо ничто не мешает нам воспользоваться аналогичным событием книги - Workbook_SheetSelectionChange

cheyan · 28.11.2014, 19:18

Да верно - ступил.
Поступить проще - вообще то так и делаю.
Но хотелось бы посмотреть возможности автоматизации - интересно оказывается.
При создании нового листа (копирования предыдущего с макросом), почему то в новом листе макрос отсутствует.
Прописываю в VBA макрос в новый лист - все нормально. В общем можно и так конечно.
Заранее спасибо.

pashulka · 28.11.2014, 19:27

Вот пример того, о чём говорилось ранее

cheyan · 28.11.2014, 19:27

А такое действо - последний "черный" день календаря прокатит?

27.11.2014, 18:57	#11
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	pashulka, причина сарказма обьяснена в следующем сообщении. и относится это не к Вашим сообщениям, а к постановке задачи. гарантий тут нет, автор темы гарантий не выдает. при начальной постановке задачи активной может оказаться ячейка на 14-м листе, содержащая формулу, которую автор писал 3 дня, собирая по по крохам информацию с 4-х форумов, а когда закрывал файл, оставил курсор в этой ячейке, а тут файл открылся и... вместо этой формулы "27 чт" и радости автора нет пределов, механизм - то работает!!! Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

27.11.2014, 19:02	#12
cheyan Пользователь Регистрация: 24.11.2014 Сообщений: 17	Новый рассказ выглядит так: на листе (макрос сам запускается при открытии книги), в ячейке которую выделил после открытия, только столбца "А" автоматически прописывается дата на текущий день в виде "27 чт", все записанное сохраняется. Заранее спасибо. Последний раз редактировалось cheyan; 27.11.2014 в 19:04.

27.11.2014, 19:14	#14
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	а) чтобы записать "сегодня" в ячейку - не обязательно ее выделять б) чтобы записать "сегодня" в определенную ячейку - надо описать алгорит по которому определяется нужная ячейка в) чтобы записать "сегодня" в выделенную ячнйку, я Вам сообщением выше описал какая ячейка будет выделенной при открытии файла и что может получиться в итоге, если выделенная ячейка не пустая может не стоит в нее ничего писать, чтобы не удалить нужную информацию? Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
помогите написать макрос...	matveyqa	Microsoft Office Excel	4	03.10.2009 13:00
Помогите написать макрос	Govard	Microsoft Office Excel	20	05.07.2009 21:29
Помогите написать макрос!!!	zmax123	Microsoft Office Excel	4	16.03.2009 14:02
Помогите написать макрос	Urban	Microsoft Office Excel	3	03.03.2009 22:28
Помогите написать макрос	Neo007	Microsoft Office Excel	4	24.10.2008 07:25

27.11.2014, 19:33	#15
cheyan Пользователь Регистрация: 24.11.2014 Сообщений: 17	спасибо пока работает как надо...

28.11.2014, 18:42	#16
cheyan Пользователь Регистрация: 24.11.2014 Сообщений: 17	Все работает, установил событие Worksheet_SelectionChange(ByVal Target As Range), убрал ThisWorkbook.Save - не совсем понадобилось... А можно ли усложнить задачу - лист в книге это в общем состав дней месяца, с именем текущего месяца в виде "Ноябрь 2014". Требуется - когда в ячейке (или нескольких) столбца А прописан последний день календаря например "30 вс", при закрытии и сохранении книги (типа - день кончился), скопировался новый лист с именем следующего месяца, также скопировался на него полностью макрос. При последующем открытии книги, открылось бы на новом листе...? Заранее спасибо.

28.11.2014, 18:59	#17
pashulka Форумчанин Регистрация: 03.11.2006 Сообщений: 524	Смотрите, сегодня 28-ноября и этот день не последний в этом месяце, 29 и 30 выходные и если Вы не выйдете на работу 30-го, то 1-декабря нового листа Вам не видать Это я к тому, что можно поступить проще, а именно - при открытии книги проверять наличии листа с именем, совпадающим с текущим месяцем (и годом, если он также актуален) и в случае его отсутствия - создавать его. А поводу копирования события листа - это излишнее, ибо ничто не мешает нам воспользоваться аналогичным событием книги - Workbook_SheetSelectionChange

28.11.2014, 19:18	#18
cheyan Пользователь Регистрация: 24.11.2014 Сообщений: 17	Да верно - ступил. Поступить проще - вообще то так и делаю. Но хотелось бы посмотреть возможности автоматизации - интересно оказывается. При создании нового листа (копирования предыдущего с макросом), почему то в новом листе макрос отсутствует. Прописываю в VBA макрос в новый лист - все нормально. В общем можно и так конечно. Заранее спасибо.

28.11.2014, 19:27	#20
cheyan Пользователь Регистрация: 24.11.2014 Сообщений: 17	А такое действо - последний "черный" день календаря прокатит?