VBA MID 函数从从指定字符编号开始的字符串中返回指定数量的字符。
Mid(文本,开始)
或者
Mid(文本,开始,字符计数)
从字符串中获取文本的不同部分:
Sub MidExample()
MsgBox Mid("www.moonexcel.com.ua", 1, 1) '返回:w
MsgBox Mid("www.moonexcel.com.ua", 1, 3) '返回:www
MsgBox Mid("www.moonexcel.com.ua", 1, 13) '返回:www.moonexcel
MsgBox Mid("www.moonexcel.com.ua", 1, 30) '返回:www.moonexcel.com.ua
MsgBox Mid("www.moonexcel.com.ua", 5, 9) '返回:moonexcel
MsgBox Mid("www.moonexcel.com.ua", 5, 4) '返回:moon
MsgBox Mid("www.moonexcel.com.ua", 9, 5) '返回:excel
MsgBox Mid("www.moonexcel.com.ua", 16, 3) '返回:com
MsgBox Mid("www.moonexcel.com.ua", 5, 50) '返回:moonexcel.com.ua
MsgBox Mid("www.moonexcel.com.ua", 5) '返回:moonexcel.com.ua
End Sub