פונקציית UCBA של Excel VBA
Ucase ב- VBA היא פונקציה מובנית המשמשת להמרת מחרוזת קלט המסופקת לה באותיות רישיות, נדרש טיעון יחיד שהוא המחרוזת כקלט והפלט שנוצר על ידי פונקציה זו הוא מחרוזת, הדבר היחיד שיש לשמור יש לזכור כי פונקציה זו ממירה את כל הפונקציות באותיות רישיות, ולא רק בתו הראשון.
ישנם מצבים בהם עלינו להמיר חלק מערכי הטקסט ל- UPPERCASE ב- Excel. ניתן לעשות זאת באמצעות פונקציית UPPER בפונקציה רגילה של גליון עבודה ופונקציה UCase בקוד VBA.
אם אתה כבר מחפש את הפונקציה UPPER ב- VBA אז לא תמצא אותה אפילו לא עם מחלקת פונקציות בגליון עבודה. ב- VBA זה פונקציה שונה לחלוטין וקצרה בשם כלומר "UCASE". כאן "U" מייצג "UPPER", ולכן הנוסחה קוראת "UPPERCASE".
תחביר
כעת, בדוק את התחביר של פונקציית UCASE.
מחרוזת: אין זה אלא מה ערך הטקסט שאנו מנסים להמיר לאותיות רישיות. זה יכול להיות גם ערך ישיר או התייחסות לתאים. נראה את שני סוגי הדוגמאות תוך זמן קצר.
כיצד להמיר טקסט לאותיות רישיות באמצעות UBA Ucase?
אתה יכול להוריד תבנית Excel VBA UCase זו כאן - תבנית VBA UCase Excelדוגמה מס '1
בואו ננסה להמיר את ערך הטקסט excel vba לטקסט גדול באמצעות הפונקציה UCase.
שלב 1: התחל את תהליך המשנה על ידי יצירת המאקרו.
קוד:
תת UCase_Example1 () סוף משנה
שלב 2: הכריז על המשתנה כמחרוזת VBA.
קוד:
תת UCase_Example1 () התעמעם כמשנה סוף מחרוזת
שלב 3: הקצה את הערך למשתנה "k" על ידי יישום הפונקציה "UCASE".
שלב 4: כאן המחרוזת היא ערך הטקסט הממוקד שאנו מנסים להמיר לאותיות גדולות וערך המחרוזת הוא "excel vba".
קוד:
תת UCase_Example1 () עמום k כמחרוזת K = UCase ("excel vba") סוף משנה 
שלב 5: בואו להציג את תוצאת המשתנה בתיבת ההודעות.
קוד:
תת UCase_Example1 () עמום k כמחרוזת k = UCase ("excel vba") MsgBox k סוף משנה 
אוקי, סיימנו עם החלק בקידוד VBA. בואו נפעיל את המאקרו כדי לראות את התוצאה בתיבת הודעה.
אז הפונקציה באותיות רישיות המירה את ערך הטקסט "excel vba" ל- "EXCEL VBA" בתוך שבריר של שניות.
דוגמה מס '2
בואו נסתכל על הדוגמה לשימוש בהתייחסות לתא לפונקציה. אותו ערך טקסט שהזנתי בתא A1.
שלב 1: נציג את התוצאה בתא טווח B1, כך שהקוד יהיה טווח ("B"). ערך =
קוד:
תת UCase_Example2 () טווח ("B1"). ערך = סוף משנה 
שלב 2: בתא B1 דרך הפונקציה UCASE נאחסן את הנתונים, אז פתח את הפונקציה UCASE.
שלב 3: כאן ערך המחרוזת הוא הפניה לתא. אז תן את התייחסות התא כטווח ("A1"). ערך.
קוד:
תת UCase_Example2 () טווח ("B1"). ערך = UCase (טווח ("A1"). ערך) סוף משנה 
אז סיימתי.
הפעל את הקוד וראה את התוצאה בתא B1.
דוגמה מס '3
בדוגמה שלעיל ראינו את הערך היחיד של תא בודד שהומר להמותר באותיות רישיות. דמיין אם יש לך כמה שמות כמו התמונה למטה.
במקרים אלה, איננו יכולים להמשיך לכתוב את הקוד לכל שורה אחת, ולכן עלינו לכלול את הנוסחה בלולאות. הקוד שלמטה ימיר את ערכי הטקסט שלמעלה לאותיות גדולות בבת אחת.
קוד:
תת UCase_Example3 () עמום k כל עוד עבור k = 2 עד 8 תאים (k, 2). ערך = UCase (תאים (k, 1). ערך) הבא k סוף משנה
פעולה זו תמיר את כל ערכי הטקסט לאותיות רישיות משורה 2 לשורה 8 באופן הבא.
תאר לעצמך אם ברצונך להמיר את כל ערכי התא שנבחרו לאותיות גדולות ואז השתמש בקוד שלהלן.
קוד:
תת UCase_Example4 () עמעום Rng כטווח הגדר Rng = בחירה עבור כל Rng בבחירה Rng = UCase (Rng. ערך) הבא Rng סוף משנה
כדי שקוד זה יעבוד, ראשית עלינו לבחור את טווח התאים שברצוננו להמיר לאותיות רישיות, ואז להפעיל את המאקרו. בטווח שנבחר רק הוא ימיר את ערכי הטקסט לתווים גדולים.