NEW ARTICLE
kotlin Listで条件を指定して最後に見つかった要素を取得する
  1. HOME
  2. vba
  3. VBA 指定した文字が見つかった位置を取得する

VBA 指定した文字が見つかった位置を取得する

  • 作成日 2022.08.23
  • vba
VBA 指定した文字が見つかった位置を取得する

VBAで、指定した文字が見つかった位置を取得するコードを記述してます。

目次

環境

  • OS windows10 64bit

サンプルコード

指定した文字が見つかった位置を取得するには、「InStr」を使用します。

InStr(検索開始位置(省略可),"文字列","検索する文字列")

【例】
InStr("abcde", "c") 
' 3

適当なボタンを用意して、セル上にある文字列「hello」の「l」が最初に見つかった位置を取得してセルに表示する
以下のソースコードを記述します。

ソースコード

Option Explicit

Private Sub CommandButton1_Click()

    Cells(3, 3).Value = InStr(Cells(3, 2).Value, "l")

End Sub

ボタンをクリックすると、位置が取得されていることが確認できます。

開始位置を指定することも可能です。

Option Explicit

Private Sub CommandButton1_Click()

    Cells(3, 3).Value = InStr(4, Cells(3, 2).Value, "l")

End Sub

実行結果