39.ファイル名を変更する

ファイル名を変更するにはNameステートメントを使用します。

構文

Name oldpathname As newpathname

oldpathname	名前を変更するファイル名を指定します。フォルダ名およびドライブ名も含めて指定できます。
newpathname	新しいファイル名を指定します。フォルダ名およびドライブ名も含めて指定できます。また、既に存在しているファイル名は指定できません。

以下のコードでは、ボタン(Command1)を押した時に、Text1で指定したファイル名をText2で指定したファイル名に変更します。その際、変更するファイルが存在しなかった場合にメッセージを表示するようにしています。

Private Sub Command1_Click()
On Error GoTo Err_Handler

Name Text1.Text As Text2.Text

Exit Sub

Err_Handler:

If Err.Number = 53 Then
MsgBox "指定したファイルは存在しません"
End If

End Sub

サンプルプログラムのダウンロード(3.45KB)

戻る