تقوم وظيفة VBA في UCASE بتحويل سلسلة أحرف إلى أحرف كبيرة.
UCase (text)
تحويل سلسلة إلى أحرف كبيرة:
Sub UCaseExample()
text = "Ref-45-X-876-rt"
text = UCase(text)
MsgBox text 'العوائد: REF-45-X-876-RT
End Sub