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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 27.11.2014, 18:57   #11
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

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

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

при начальной постановке задачи активной может оказаться ячейка на 14-м листе, содержащая формулу, которую автор писал 3 дня, собирая по по крохам информацию с 4-х форумов, а когда закрывал файл, оставил курсор в этой ячейке, а тут файл открылся и... вместо этой формулы "27 чт" и радости автора нет пределов, механизм - то работает!!!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 27.11.2014, 19:02   #12
cheyan
Пользователь
 
Регистрация: 24.11.2014
Сообщений: 17
По умолчанию

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

Последний раз редактировалось cheyan; 27.11.2014 в 19:04.
cheyan вне форума Ответить с цитированием
Старый 27.11.2014, 19:09   #13
pashulka
Форумчанин
 
Регистрация: 03.11.2006
Сообщений: 524
По умолчанию

P.S. Если клик правой кнопкой мышки уже не катит, и нужно действительно выделение ячейки, то замените вышеуказанное событие на Worksheet_SelectionChange (см. пример)
Вложения
Тип файла: zip Sample_for_Cheyan.zip (7.2 Кб, 6 просмотров)

Последний раз редактировалось pashulka; 28.11.2014 в 01:23.
pashulka вне форума Ответить с цитированием
Старый 27.11.2014, 19:14   #14
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

а) чтобы записать "сегодня" в ячейку - не обязательно ее выделять
б) чтобы записать "сегодня" в определенную ячейку - надо описать алгорит по которому определяется нужная ячейка
в) чтобы записать "сегодня" в выделенную ячнйку, я Вам сообщением выше описал какая ячейка будет выделенной при открытии файла и что может получиться в итоге, если выделенная ячейка не пустая может не стоит в нее ничего писать, чтобы не удалить нужную информацию?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 27.11.2014, 19:33   #15
cheyan
Пользователь
 
Регистрация: 24.11.2014
Сообщений: 17
По умолчанию

спасибо пока работает как надо...
cheyan вне форума Ответить с цитированием
Старый 28.11.2014, 18:42   #16
cheyan
Пользователь
 
Регистрация: 24.11.2014
Сообщений: 17
По умолчанию

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

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

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

А поводу копирования события листа - это излишнее, ибо ничто не мешает нам воспользоваться аналогичным событием книги - Workbook_SheetSelectionChange
pashulka вне форума Ответить с цитированием
Старый 28.11.2014, 19:18   #18
cheyan
Пользователь
 
Регистрация: 24.11.2014
Сообщений: 17
По умолчанию

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

Вот пример того, о чём говорилось ранее
Вложения
Тип файла: zip Sample_for_Cheyan2.zip (8.1 Кб, 11 просмотров)
pashulka вне форума Ответить с цитированием
Старый 28.11.2014, 19:27   #20
cheyan
Пользователь
 
Регистрация: 24.11.2014
Сообщений: 17
По умолчанию

А такое действо - последний "черный" день календаря прокатит?
cheyan вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
помогите написать макрос... 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