Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/12: Рейтинг темы: голосов - 12, средняя оценка - 4.50
Uri-
0 / 0 / 0
Регистрация: 03.08.2011
Сообщений: 3
1

Как прибавить к имени файла текущую дату ?

07.08.2011, 08:59. Просмотров 2345. Ответов 5
Метки нет (Все метки)

Как прибавить к имени файла текущую дату?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.08.2011, 08:59
Ответы с готовыми решениями:

Как скопировать лист в новый файл и обозвать его (файл) именем, включающим текущую дату?
Господа, как скопировать лист в новый файл и обозвать его (файл) именем,...

Вывести текущую дату на форму
Всем добрый день! Как можно вывести текущую дату компьютера на форму. ...

Вывести текущую дату и время VBA
Создать новую процедуру, в которой разобрать на отдельные составляющие текущую...

Вывести текущую дату и день недели словами
вывести текущую дату и день недели словами например мы вводим 15.05.1990 и...

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

5
BizzoN
0 / 0 / 0
Регистрация: 06.08.2011
Сообщений: 5
07.08.2011, 11:04 2
Попробуй так:
Visual Basic
1
2
3
4
5
6
7
dim имяфайла as String
' ...
 
ActiveWorkbook.SaveAs FileName:=имяфайла & '_' & Date, _
        FileFormat:=xlNormal, Password:='', WriteResPassword:='', _
        ReadOnlyRecommended:=False, CreateBackup:=False
' ...
0
Uri-
0 / 0 / 0
Регистрация: 03.08.2011
Сообщений: 3
09.08.2011, 13:19  [ТС] 3
Спасибо, что откликнулись.
Данный код в принципе работает, но сохранение типа файла получается как тип файла '2005'. Пробую прибавить расширение *.xls не получается и еще прошу прощения, как прибавить текущее время. Еще раз спасибо. Uri.
0
Uri-
0 / 0 / 0
Регистрация: 03.08.2011
Сообщений: 3
09.08.2011, 13:26  [ТС] 4
Прошу прощения, по расширению файла убрал лишнию кавычку и сработало, но по текущему времени вопрос. Спасибо.
0
Sinclair
0 / 0 / 0
Регистрация: 09.08.2011
Сообщений: 4
09.08.2011, 17:15 5
To Uri: посмотри для общего развития ф-ии Time и Format
0
BizzoN
0 / 0 / 0
Регистрация: 06.08.2011
Сообщений: 5
09.08.2011, 18:14 6
Visual Basic
1
2
3
ActiveWorkbook.SaveAs FileName:=имяфайла & '_' & Date & '_' Time, _
FileFormat:=xlNormal, Password:='', WriteResPassword:='', _
ReadOnlyRecommended:=False, CreateBackup:=False
функция Time дает текущее системное время.
0
09.08.2011, 18:14
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.08.2011, 18:14

Вставить текущую дату формата чч/мм/гг, без дальнейших изменений, в ячейку а2
Здравствуйте. Помогите в следующем вопросе - в MS EXCEL 2007 создал кнопку с...

Вывести текущую дату, время, год,квартал, месяц,день года
Я использовала вот такой способ.а как еще можно? Private Sub...

Добавить к названию файла дату сохранения. "Сохранить как" отключено
Здравствуйте, подскажите, пожалуйста, я уже запутался... что не правильно: ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru