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