Как указать путь в коде VBA при сохранение файла

Пользователь

Сообщений: 34 Регистрация: 10.05.2020

21.10.2020 08:12:16

Всем здравствуйте!

Данный код берет название для файла из определенной ячейки и сохраняет его.
Как указать определенный путь для сохранения?

Код
Sub t() ActiveWorkbook.SaveAs Filename:=Cells(2, 2) & ".xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled End Sub

Mershik Пользователь Сообщений: 8277 Регистрация: 03.12.2015	#2 21.10.2020 08:58:56 alexexcel1990, одна тема - один вопрос) https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=59672 https://www.planetaexcel.ru/techniques/3/160/ https://excelvba.ru/code/SaveActiveSheet Изменено: Mershik - 21.10.2020 08:59:15 Не бойтесь совершенства. Вам его не достичь.

alexexcel1990 Пользователь Сообщений: 34 Регистрация: 10.05.2020	#3 21.10.2020 09:53:09 Мало что понятно в этих темах..

Пользователь

Сообщений: 8277 Регистрация: 03.12.2015

21.10.2020 10:11:51

alexexcel1990, да вы их видимо не смотрели просто
так как там конкретно в одной из ссылок (https://www.planetaexcel.ru/techniques/3/160/) указано:

Цитата
Этот макрос сохраняет новые книги-листы в ту же папку, где лежал исходный файл. При необходимости сохранения в другое место, замените wb.Path на свой путь в кавычках, например "D:\Отчеты\2012" и т.п.

Не бойтесь совершенства. Вам его не достичь.

Jack Famous Пользователь Сообщений: 12064 Регистрация: 07.11.2014 OS: Win 10 Корп. x64 \| Excel 2016 x64: \| Browser: Chrome	#5 21.10.2020 10:35:30 alexexcel1990, отдельная тема про исключение "дроби" была создана и ответ был получен - предложите новое название для ЭТОЙ темы Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄