HOME > 即効テクニック > Excel VBA > 文字列操作関連のテクニック > 文字列の右から任意の長さの文字列を取得する(Right関数、RightB関数)

即効テクニック

文字列操作関連のテクニック

文字列の右から任意の長さの文字列を取得する(Right関数、RightB関数)

(Excel 2000)
引数stringで指定した文字列の左から、引数lengthで指定した長さの文字列を取得します。


構文 Right(String, Length)
   RightB(String, Length)

 設定項目        内容
  String     取り出し元となる文字列式を指定 [省略不可]
  Length     取り出す文字列の長さを指定 [省略不可]


次のサンプルでは、アクティブなブックの名前の右から3文字分、つまり拡張子を取得し、それでファイルの種類を特定しています。

●サンプル●
Sub RightSamp1()
    Dim myStr As String

    '---拡張子取得
    myStr = Right(ActiveWorkbook.Name, 3)
    Select Case myStr
        Case "xls"
            MsgBox "エクセルのブックです"
        Case "csv"
            MsgBox "CSVファイルです"
        Case "txt"
            MsgBox "テキストファイルです"
        Case Else
            If ActiveWorkbook.Path = "" Then
                MsgBox "新規ブックです"
            Else
                MsgBox myStr & "ファイルです"
            End If
   End Select

End Sub