Сохранение файла

[AHTOXA]

Как сделать так, чтобы файл сохранялся в той папке куда установлен excel?

[corgi]

ну вот так

Код: Выделить всё

ActiveWorkbook.SaveAs filename:=myfilename, FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False


а в myfilename прописываешь путь и имя файла

[AHTOXA]

Дело в том что я не Книгу сохраняю, а некоторую запись:

Const CfgFileName = "concnf.ini"

Public Function SaveConfig(concfgInfo As ConnectionInfo)
On Error GoTo errors
Open CfgFileName For Random As #1 Len = Len(concfgInfo)
Put #1, 1, concfgInfo
GoTo ends
errors:
MsgBox (Err.Description)
Err.Clear
ends:
Close #1
End Function

Нет ли какой-либо предопределенной переменной, которая бы указывала на тот путь, куда установлен excel?

[RayShade]

Application.Path

[AHTOXA]

Спасибо, теперь сохраняет куда нужно.