ファイル保存の際に既に同じファイル名が存在するかチェックを行うには？ (ID:116943)

名前

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

本文 そういう関数は結構使ったりしているので、こんなのを作っています。 Public Function s_FileExist(ByVal FilePath As String) As Boolean '入力されたパスがファイル名で勝つ存在するなら：True それ以外：False On Error Resume Next s_FileExist = (GetAttr(FilePath) And vbDirectory) <> vbDirectory On Error GoTo 0 End Function 多分ファイルだけを判別します…ｗ