Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Сохранить в текущую папку

2.0K
03 мая 2004 года
TimON
26 / / 17.02.2003
Есть Excel, в котором я написал макрос сохранения файла, но сохраняет почему-то не в папку с моим документом, а в папку MyDocuments (WinXP Eng).

Open "Date.sql" For Output As #1

так я указываю, подскажите как сделать, чтоб сохранял туда, где находится сам файл Excel.
524
03 мая 2004 года
BurAn
42 / / 20.05.2000
Цитата:
Originally posted by TimON
Есть Excel, в котором я написал макрос сохранения файла, но сохраняет почему-то не в папку с моим документом, а в папку MyDocuments (WinXP Eng).

Open "Date.sql" For Output As #1

так я указываю, подскажите как сделать, чтоб сохранял туда, где находится сам файл Excel.



Я бы попробовал вот так:

Dim FileName as String
FileName = App.Path & "\Date.sql"
Open FileName For Output As #1

2.0K
03 мая 2004 года
TimON
26 / / 17.02.2003
Цитата:
Originally posted by BurAn


Я бы попробовал вот так:

Dim FileName as String
FileName = App.Path & "\Date.sql"
Open FileName For Output As #1



На это он выдёт ошибку:
Run-time error '424'
object required

на строчку FileName = App.Path & "\Date.sql"

524
03 мая 2004 года
BurAn
42 / / 20.05.2000
Цитата:
Originally posted by TimON


На это он выдёт ошибку:
Run-time error '424'
object required

на строчку FileName = App.Path & "\Date.sql"


Да... В Excel-e надо по-другому... А иненно:

Dim FileName As String
FileName = Excel.Application.ActiveWorkbook.Path & "\Date.sql"
Open FileName For Output As #1
Print #1, "bla-bla-bla-bla"
Close #1

Рад был помочь.

2.0K
05 мая 2004 года
TimON
26 / / 17.02.2003
Цитата:
Originally posted by BurAn

Да... В Excel-e надо по-другому... А иненно:

Dim FileName As String
FileName = Excel.Application.ActiveWorkbook.Path & "\Date.sql"
Open FileName For Output As #1
Print #1, "bla-bla-bla-bla"
Close #1

Рад был помочь.



Спасибо!

По ходу дела возник новый вопрос:

Когда записывает в файл Data.sql, то после последней строчки записывается ещё знак переноса строки, нельзя ли, чтоб этот знак не записывался, т.е. чтоб когда открываешь файл, и переходишь в конец файла, то курсор был не на новой строке, а после последней записи.

524
06 мая 2004 года
BurAn
42 / / 20.05.2000
Цитата:
Originally posted by TimON


Спасибо!

По ходу дела возник новый вопрос:

Когда записывает в файл Data.sql, то после последней строчки записывается ещё знак переноса строки, нельзя ли, чтоб этот знак не записывался, т.е. чтоб когда открываешь файл, и переходишь в конец файла, то курсор был не на новой строке, а после последней записи.



Честно сказать не знаю...
А нельзя ли при открытии файла сразу же удалить последний символ?
Может это выход?

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог