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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 09.03.2010, 08:14   #1
OgE®_M@G
Форумчанин
 
Аватар для OgE®_M@G
 
Регистрация: 28.06.2008
Сообщений: 124
По умолчанию Сохранение книги в известную папку

Здравствуйте уважаемые. Есть такая задача необходимо сделать следующее:
1. После нажатия на кнопку размещенную на листе Excel появлялось окно сохранения файла, где пользователь мог ввести имя своего файла, чтобы сохранялась вся книга в указанную мною папку и чтобы пользователь не смог сменить путь к ней или выбрать его.
2. К имени файла которое введет пользователь добавлялась текущие время и дата сохранения.
Как это сделать подскажите пожалуйста.
OgE®_M@G вне форума Ответить с цитированием
Старый 09.03.2010, 08:46   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Посмотрите пример во вложении. В коде макроса измените путь на требуемый.
Вложения
Тип файла: rar Книга1.rar (9.5 Кб, 71 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 09.03.2010, 09:22   #3
OgE®_M@G
Форумчанин
 
Аватар для OgE®_M@G
 
Регистрация: 28.06.2008
Сообщений: 124
По умолчанию

SAS888 как всегда Вы помогли мне. Спасибо Вам большое за помощь. Это как раз то што мне нужно.
OgE®_M@G вне форума Ответить с цитированием
Старый 24.03.2010, 21:51   #4
romale_80
Пользователь
 
Аватар для romale_80
 
Регистрация: 22.03.2010
Сообщений: 31
По умолчанию

а возможно сохранить точно также только только лист, который сохранится без формул?
romale_80 вне форума Ответить с цитированием
Старый 25.03.2010, 08:18   #5
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Цитата:
а возможно сохранить точно также только только лист, который сохранится без формул?
Перед строкой кода
Код:
ThisWorkbook.SaveAs Filename:=fName
вставьте строку
Код:
ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
Если нужно - сделайте это не только для активного, но и для всех листов книги.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 25.03.2010, 13:05   #6
romale_80
Пользователь
 
Аватар для romale_80
 
Регистрация: 22.03.2010
Сообщений: 31
По умолчанию

сделал как сказали, он мне выкидывает какую то ошибку, прочесть не могу, комп на иврите.

мне удалось прочитать, пишет следующее: MsgBox "Файл сохранен не будет!!!"
мозахно ли сделать иначе: чтоб была кнопка сохранить, и сохранялся только лист с данными без формул и макрос кнопок. при этом чтоб брал имя с определенной ячейки добовлял время и дату, и автоматически сохранял?
вот это было бы здорово и очень облегчит работу
спасибо

Последний раз редактировалось Stilet; 15.04.2010 в 07:36.
romale_80 вне форума Ответить с цитированием
Старый 26.03.2010, 08:50   #7
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Цитата:
пишет следующее: MsgBox "Файл сохранен не будет!!!"
Такое сообщение макрос выдает при попытке сохранения файла при помощи "Сохранить" или "Сохранить как...". Эти действия запрещены. Сохранение допустимо нажатием кнопки на рабочем листе. При этом, файл сохраняется с введенным пользователем именем, но в конкретную (прописанную в коде макроса явно) папку с добавлением даты и времени.
А Ваши пожелания реализованы в следующем вложении. При нажатии кнопки, активный лист сохраняется в конкретную папку с именем, содержащемся в ячейке "A1" с добавлением даты и времени. Все формулы, ссылки и функции на листе уничтожаются. Кнопка и макрос удаляются. Для изменения пути сохранения и адреса ячейки с именем файла, сделайте соответствующие изменения в коде макроса (там есть примечания).
Вложения
Тип файла: rar Книга2.rar (8.4 Кб, 55 просмотров)
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 26.03.2010 в 08:53.
SAS888 вне форума Ответить с цитированием
Старый 12.04.2010, 15:20   #8
romale_80
Пользователь
 
Аватар для romale_80
 
Регистрация: 22.03.2010
Сообщений: 31
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Такое сообщение макрос выдает при попытке сохранения файла при помощи "Сохранить" или "Сохранить как...". Эти действия запрещены. Сохранение допустимо нажатием кнопки на рабочем листе. При этом, файл сохраняется с введенным пользователем именем, но в конкретную (прописанную в коде макроса явно) папку с добавлением даты и времени.
А Ваши пожелания реализованы в следующем вложении. При нажатии кнопки, активный лист сохраняется в конкретную папку с именем, содержащемся в ячейке "A1" с добавлением даты и времени. Все формулы, ссылки и функции на листе уничтожаются. Кнопка и макрос удаляются. Для изменения пути сохранения и адреса ячейки с именем файла, сделайте соответствующие изменения в коде макроса (там есть примечания).

тетировал, но мне не сохраняет граф или картинку, только ячейки. как сделать чтоб он сохранял все а не только яцейки,

спасибо
роман
romale_80 вне форума Ответить с цитированием
Старый 13.04.2010, 04:40   #9
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Цитата:
как сделать чтоб он сохранял все а не только яцейки
Давайте пример файла и опишите, куда, что и в каком виде Вы хотите сохранять.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 13.04.2010, 10:36   #10
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

для SAS888
При сохранении без формул (Книга2) действительно формулы и кнопка удаляются, но макрос для кнопки на лист1 в копии - остается. А как его удалить?
С уважением
alvazor вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Програмное сохранение книги на флешку. nemoomen Microsoft Office Excel 4 05.07.2009 22:34
Сохранение копии книги при ее закрытии. Busine2009 Microsoft Office Excel 17 17.06.2009 04:36
Сохранение книги большого размера. nemoomen Microsoft Office Excel 12 22.03.2009 05:57
Сохранение загруженного в TImage изображения в папку с программой Torymo Помощь студентам 1 06.02.2009 03:41
Сохранение книги с интерфейсом. Возможно? smand Microsoft Office Excel 7 06.12.2007 06:05