機能と数式 | VBA | セミナー | オンラインソフト | お問い合わせ | その他
Top > Excel > VBA > FileSystemObject

Driveオブジェクト - VolumeNameプロパティ



【書式】
Drive.VolumeName

ドライブのボリューム名を取得または設定します。
ドライブのボリューム名は、[マイ コンピュータ]で表示されるドライブ名です。プロパティのダイアログボックスで設定できます。
Sub test37()
    Dim FSO As Object, DriveObject As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''Cドライブのボリューム名が空欄だったら「Office TANAKA」と設定します
    If FSO.GetDrive("C").VolumeName = "" Then
        FSO.GetDrive("C").VolumeName = "Office TANAKA"
    End If
    Set DriveObject = Nothing
    Set FSO = Nothing
End Sub



このエントリーをはてなブックマークに追加