ترجع الدالة VBA MID عدد الأحرف المحدد من سلسلة أحرف تبدأ برقم الحرف المحدد.
Mid (نص ، بداية)
أو
Mid (نص ، بداية ، char_count)
الحصول على أجزاء مختلفة من النص من سلسلة:
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