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

InStrRev関数



構文
InStrRev(string1,string2[,start[,compare]])
引数string1には、検索の対象となる文字列を指定します。
引数string2には、引数string1の中から検索する文字列を指定します。
引数startは省略可能です。検索を始める位置を指定します。
引数compareは省略可能です。文字列を比較するモードを指定します。

解説
InStrRev関数は、引数string1で指定した文字列の中から引数string2で指定した文字列を後方から検索して、見つかった位置を返します。
引数compareには次の定数を指定できます。
数値 内容
 0   テキストモードで比較します。大文字と小文字の区別をしません 
 1   バイナリモードで比較をします 
 2   Microsoft Accessでのみ使用できます 

サンプル
次の例は、C:\Test.csvを読み込んで最終データを表示します。

Sub Sample()
    Dim buf As String, msg As String
    Open "C:\Test.csv" For Binary As #1
    buf = Space(FileLen("C:\Test.csv"))
    Get #1, , buf
    Close #1
    msg = Mid(buf, InStrRev(buf, ",") + 1)
    MsgBox msg
End Sub



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