VBAでInStrを使用して指定文字位置を返します。
1 2 3 4 5 6 |
Sub macro Dim str = As String str = "aiueo" Debug.Print InStr(str, "u") Debug.Print InStr(str, "x") End Sub |
結果は以下のようになります。
1 2 |
3 0 |
第二引数の文字列があれば指定文字位置を返しますが、ない場合は0を返します。
if文などで0と比較して使ったりします。
1 2 3 4 5 6 7 8 9 |
Sub macro() Dim str As String str = "DATE" If (InStr(str, "date") > 0) Then Debug.Print "処理する" Else Debug.Print "処理しない" End If End Sub |
KHI入社して退社。今はCONFRAGEで正社員です。関西で140-170/80~120万から受け付けております^^
得意技はJS(ES6),Java,AWSの大体のリソースです
コメントはやさしくお願いいたします^^
座右の銘は、「狭き門より入れ」「願わくは、我に七難八苦を与えたまえ」です^^