открыть файл первенствовать на экспорт УВЕ доступа

Set wbTarget1 = xl.Workbooks.Open ("C: \ Users \ Владелец \ Dropbox \ Trk_Insp_1204_10_08_2016.xlsx")открыть файл первенствовать на экспорт УВЕ доступа

расположение отличается от других машин, т.е. владелец - другой. Могу ли я использовать current.path? Могу ли я использовать дикие карты или

~ \ Trk_Insp_1204_10_08_2016.xlsx

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

Dennis

источник

2016-11-16 Dennis

Используйте 'Environ $ ("USERPROFILE")'. – Comintern

http://www.ammara.com/access_image_faq/get_mdb_database_path.html –

Установить xlWkb = xlApp.Workbooks.Open (Environs $ ("USERPROFILE") & "\ Dropbox \ Trk_Insp_1204_10_08_2016.xlsx") Я получаю Sub или функцию не определенную , сосредоточенный вокруг Environs $ Я не уверен, как использовать эту функцию, я сделал некоторые поиски и не могу найти нужную мне помощь. – Dennis

Пожалуйста, сделайте простой тест суб и тест:

Sub EnvTest() 
Dim S as String 

S = Environ("USERPROFILE") & "\Dropbox\Trk_Insp_1204_10_08_2016.xlsx" 
Debug.Print S 
End Sub

источник

2017-04-18 14:41:48 peakpeak

открыть файл первенствовать на экспорт УВЕ доступа

ответ

Смежные вопросы