VBAで指定の文字数を切出す(抽出)する方法

Mid(文字列，抽出開始位置，抽出文字数)

Right（文字列，抽出文字数)

Left（文字列，抽出文字数)

Mid関数は指定開始位置から指定文字数までを抽出
Right関数は右から指定文字数までを抽出
Left関数は左から指定文字数までを抽出

--------------------------------------------------------------
Sub strTyuusyutu()
　　　　Dim astr As String
　　　　astr = "FC2ブログ-Mocho"

　　　　MsgBox Mid(astr, 3, 3) '「ブログ」と表示されます　　　　
　　　　MsgBox Right(astr, 5) 　'「Mocho」と表示されます　
　　　　MsgBox Left(astr, 3) '「FC2」と表示されます
End Sub
--------------------------------------------------------------

EXCEL VBA xls Excel2003