| imho.ws |
![]() |
|
|
|
# 1 |
|
Member
Регистрация: 09.12.2002
Адрес: Казань
Сообщения: 249
![]() ![]() ![]() ![]() |
Вобщем так, у меня есть книга в формате xls которая каждый день обновляется из внешних источникв, и мне надо чтобы при сохраннении книги вместо имени файла была текущая дата. Как можно осуществить такое? Мне говорили что с помощью макросов, но я не умею ими пользоваться.
Заранее спасибо.
__________________
Life is WONDERFUL!!! |
|
|
|
|
# 2 |
|
Member
Регистрация: 03.07.2002
Адрес: Черноземье
Сообщения: 261
![]() ![]() ![]() ![]() ![]() |
попробуй вот этот код в редакторе макросов. А затем просто выполни макрос SaveCurDate.
Sub SaveCurDate() Dim CurDate, Path, FName As String CurDate = Date$ Path = "c:\" 'дирекория для сохранения FName = CurDate + ".xls" ActiveWorkbook.SaveAs Filename:=Path + FName, FileFormat:= _ xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _ , CreateBackup:=False End Sub Правда есть здесь один минус, если такой фал существует, то появиться вопрос о презаписи. Последний раз редактировалось Mazzi; 07.10.2003 в 11:10. |
|
|