GetOpenFileNameでフォルダ指定するには？ (ID:83515)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 たとえばこう。 Dim xl As Excel.Application ChDir "C:\Program Files" Set xl = CreateObject("Excel.Application") xl.GetOpenFilename xl.Quit Set xl = Nothing