קוד מאקרו לדוגמה לשינוי מצב הרישיות של טקסט ב- Excel

סיכום

למרות ש- Microsoft Excel כולל פונקציות שמ ישנו את הרישיות של טקסט, יש מקרים שבהם ייתכן שתרצה לשנות רישיות טקסט באופן תיכנותי.

מאמר זה מכיל שלוש פקודות מאקרו לדוגמה של Microsoft Visual Basic for Applications (פרוצדורות משנה) שניתן להשתמש בהן כדי לשנות את האותיות במחרוזת טקסט לאותיות רישיות, לאותיות קטנות בלבד או לאותיות רישיות בלבד (האות הראשונה בכל מילה היא רישית). פעולות אלה דומות לפונקציות של Excel, =UPPER(), =LOWER() ו- =PROPER().

מידע נוסף

Microsoft מספקת דוגמאות תיכנות לאיור בלבד, ללא אחריות, מפורשת או משתמעת. הדבר כולל, אך אינו מוגבל לאחריות המשתמעת של סוחר או התאמה למטרה מסוימת. מאמר זה מבוסס על ההנחה שאתה מכיר את שפת התיכנות המודגמת, עם הכלים המשמשים ליצירת הליכים ולאתר באגים. מהנדסי התמיכה של Microsoft יכולים לעזור להסביר את הפונקציונליות של הליך מסוים, אך הם לא ישנו דוגמאות אלה כדי לספק פונקציונליות נוספת או לבנות הליכים שיסייעו לך לעמוד בדרישות הספציפיות שלך.

Sub Uppercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("A1:A5")
      ' Change the text in the range to uppercase letters.
      x.Value = UCase(x.value)
   Next
End Sub

Sub Lowercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("B1:B5")
      x.Value = LCase(x.Value)
   Next
End Sub

Sub Proper_Case()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("C1:C5")
      ' There is not a Proper function in Visual Basic for Applications.
      ' So, you must use the worksheet function in the following form:
      x.Value = Application.Proper(x.Value)
   Next
End Sub

הפניות

לקבלת מידע נוסף אודות אופן השימוש בפונקציות גליון עבודה כדי לשנות את הרישיות של טקסט, לחץ על מספר המאמר הבא כדי להציג את המאמר מתוך מאגר הידע Microsoft Knowledge Base:

263580 כיצד לשנות את הרישיות של טקסט ב- Excel

לקבלת מידע נוסף אודות קבלת עזרה עבור Visual Basic for Applications, לחץ על מספר המאמר הבא כדי להציג את המאמר מתוך מאגר הידע Microsoft Knowledge Base:

305326 רשימת משאבי תיכנות עבור Visual Basic for Applications