任意の位置と文字数の文字を取り出す

サンプルソース

' 任意の位置と文字数の文字を取り出す
Cells(1,1) = Mid("abcdeabcdef",2,1)
' 結果はb
Cells(1,1) = Mid("abcdeabcdef",2,3)
' 結果はbcd
Cells(1,1) = Mid("abcdeabcdef",2)
' 結果はbcdeabcdef

解説

Mid()は指定位置から指定文字数の文字数を取得します。
1つ目の引数は文字位置、2つ目の引数は文字数です。

2つ目の引数を省略すると、指定した文字位置以降の文字を取得できます。




文字操作



Excel VBA講座
VBScriptサンプル集

日付操作
     ...すべてのサンプルをみる



関連リンク
 セル、シート、ブックの参照や操作、
 書式設定に関するサンプル集。
Copyright (C) ExcelVBA@Workshop All rights reserved.