引数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