StartupPath

構文
String = Application.StartupPath
引数
戻値

プログラム実行例

スタートアップフォルダのパスを取得

DIM Excel = CREATEOLEOBJ("Excel.Application")
Excel.Visible = TRUE

PRINT Excel.Application.StartupPath

//Excel.Application.DisplayAlerts = FALSE
//Excel.Quit
結果
C:\Users\akita\AppData\Roaming\Microsoft\Excel\XLSTART