VBA Midで文字列の途中から最後までを切り出す

環境
Windows 10 Home
Excel 2013

構文
Mid(文字列,開始の位置)
文字列の途中から最後までを取得します。

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Sub testark()
Dim tt As String
tt = "テストデータ"
Debug.Print Mid(tt, 2)
Debug.Print Mid(tt, 3)
Debug.Print Mid(tt, 4) '
End Sub
Sub testark() Dim tt As String tt = "テストデータ" Debug.Print Mid(tt, 2) Debug.Print Mid(tt, 3) Debug.Print Mid(tt, 4) ' End Sub
Sub testark()

    Dim tt As String
    tt = "テストデータ"
    
    Debug.Print Mid(tt, 2)
    Debug.Print Mid(tt, 3)
    Debug.Print Mid(tt, 4) '
    
End Sub

実行結果
ストデータ
トデータ
データ

VBScript

Posted by arkgame