Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль

Купить рекламу на форуме 15-35 тыс рублей в месяц

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

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

           Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
           И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - https://clck.ru/fCqwP

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 11.06.2009, 15:56   #11
sonych
 
Регистрация: 09.06.2009
Сообщений: 8
По умолчанию

подскажите, плиз, ещё. Что я не так делаю? надо, чтобы сначала кнопка была неактивна, а после того, как значение хотя бы одной ячейки изменится, то кнопка становилась активной.

вот, что я накалякал

CommandButton1.Enabled = False
If Cells.Calculate = True Then
CommandButton1.Enabled = True
Else: CommandButton1.Enabled = False
End If

Условие выполняется только частично, т.е. активна становится в самом начале, чего быть не должно
спасибо
sonych вне форума
Старый 14.06.2009, 12:08   #12
sonych
 
Регистрация: 09.06.2009
Сообщений: 8
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Во-первых, сохраненная книга будет иметь всегда одно и то же имя: "Заказ & dd.mm.yy_hh.mm.ss.xls".
Во-вторых, имя активной рабочей книги тоже изменится.
Правильно так:
Код:
Private Sub Заказать_Click()
    F$ = "D:\Personal$\User\Рабочий стол\Новая папка\Заказ " & Format(Now, "dd.mm.yy_hh.mm.ss") & ".xls"
    ThisWorkbook.SaveCopyAs Filename:=F$
End Sub
Обратите внимание: не ThisWorkbook.SaveAs..., а ThisWorkbook.SaveCopyAs...
ещё один вопросик можно по этой процедуре?
если этот файл открыть как HTML-страницу, то процедура не работает. Пишет ошибку. Это можно как-нить исправить?
Спасибо
sonych вне форума
Старый 15.06.2009, 08:41   #13
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,176
По умолчанию

Цитата:
надо, чтобы сначала кнопка была неактивна, а после того, как значение хотя бы одной ячейки изменится, то кнопка становилась активной.
Если в параметрах Excel установлен автоматический пересчет ячеек, то событие "Calculate" наступает как при пересчете формул при изменении значений ячеек (кстати, только зависимых от формул), так и при открытии книги. Именно поэтому у Вас кнопка активируется.
Для того, чтобы при открытии книги кнопка CommandButton1 была не активна, а при изменении значения любой ячейки кнопка стала доступной, в модуль листа с кнопкой вставьте код:
Код:
Private Sub Worksheet_Change(ByVal Target As Range): CommandButton1.Enabled = True: End Sub
А в модудь "Эта кгига" код:
Код:
Private Sub Workbook_Open(): Sheets(1).CommandButton1.Enabled = False: End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean): Workbook_Open: End Sub
Естественно, вместо Sheets(1) используйте ссылку на лист с кнопкой.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 15.06.2009, 09:08   #14
sonych
 
Регистрация: 09.06.2009
Сообщений: 8
По умолчанию

2 SAS888

спасибо большое. если не сложно, подскажите, ещё по моему предыдущему посту про HTML
спасибо
sonych вне форума
Старый 15.06.2009, 10:35   #15
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,176
По умолчанию

Цитата:
если не сложно, подскажите, ещё по моему предыдущему посту про HTML
Если бы знал - ответил бы сразу.
Впредь: в постах темы не обращайтесь лично. Для этого есть ЛС и т.п.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 15.06.2009, 10:42   #16
sonych
 
Регистрация: 09.06.2009
Сообщений: 8
По умолчанию

хорошо, спасибо
sonych вне форума
Старый 16.06.2009, 22:25   #17
valensia68
Новичок
Джуниор
 
Регистрация: 16.06.2009
Сообщений: 1
По умолчанию

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

Последний раз редактировалось valensia68; 16.06.2009 в 22:53.
valensia68 вне форума
Старый 17.06.2009, 04:36   #18
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,176
По умолчанию

Цитата:
как правильно очистить предыдущую уже заполненную форму
Написать макрос, который будет очищать содержимое требуемых ячеек.
Боюсь, что без примера файла, более конкретного ответа Вы не дождетесь.

P.S. Правила форума: Новый вопрос - новая тема.
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 17.06.2009 в 04:37. Причина: Добавлено
SAS888 вне форума
Закрытая тема

           Интенсив по Python: Работа с API и фреймворками 3-5 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
           Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автозапуск макроса при открытии и закрытии книги ruavia3 Microsoft Office Excel 8 06.04.2009 11:09
Как выполнить действие при закрытии Книги? valerij Microsoft Office Excel 9 12.03.2009 15:31
При закрытии книги, удаляются листы Romuald Microsoft Office Excel 3 20.01.2009 21:34
Как в Adobe Reader 8 отключить сохранение копии? Mikalai Софт 0 14.03.2008 14:48