Страницы: 1
RSS
ActiveWorkbook.Save
 
Всем привет.  
 
Есть макрос с коммандой ActiveWorkbook.Save.    
 
Понятно, что сохраняет книгу на жесткий диск.  
 
Подскажите комманду, как делать точно то же самое, только в определенную папку.  Как задать путь?    
 
И если папки нет, как ее создать посредствам макроса?
 
Читайте справку по SaveAs Method, MkDir Statement.  
 
44445
Я сам - дурнее всякого примера! ...
 
Скажу честно. Не разобрался.  
 
Можете написать пример?  
 
Чтоб создало папку c:\папка1  
 
И в эту папку сохраняло файлы.  
 
Спасибо!
 
ActiveWorkbook.SaveAs Filename:="Y:\папка1\папка2\название самого файла.xls"
 
пример:  
 http://www.planetaexcel.ru/forum.php/?thread_id=1082
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Создание нужной папки:  
 
Sub Test()  
   Dim iPath As String  
   iPath = "C:\папка1"  
   If Dir(iPath, vbDirectory) = "" Then MkDir (iPath)  
End Sub
Редко но метко ...
Страницы: 1
Читают тему
Наверх