آسف أخي على التأخر في الرد إذا لم تنفع الطريقة السابقة جرب تغيير الـ Font.Name و اجعلها: Font.Name = 'MS Sans Serif'
الإختبارات .. دعواتكم ..