VBAで任意の文字位置から指定した文字数分の文字を取得するには
Mid関数を使います。
第1引数に取得する文字列、
第2引数に取得する文字の開始位置(左から数えて)、
第3引数に取得する文字数を入力します。
Debug.Print Mid("Ganasys", 2, 4)
結果はイミディエイトペインに
anas
と表示されます。
第3引数を省略すると、第2引数で指定した文字の開始位置から
文字列の最後までを取得します。
Debug.Print Mid("Ganasys", 4)
結果はイミディエイトペインに
asys
と表示されます。