Refresh後にファイル選択の状態にするには？ (ID:122829)

名前

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

本文 ただ単に最初の項目を選択するのでよかったら >File1.Refresh >'ファイル選択 >For c = 0 To File1.ListCount - 1 > If File1.List(c) <> "" Then File1.Selected(c) = True >Next c の部分は単に File1.Refresh if File1.ListCount >0 then File1.Selected(0) = True end if