עברית הפוכה באקסל? אין בעיה
פתחתם קובץ CSV והעברית הפוכה? אין בעיה! מסתבר שקיימת פונקציה מובנית באקסל להפיכת הכיוון של מחרוזת טקסט
העברית בקובץ הפוכה? מישהו במייקרוסופט דואג לכם. האקסל מצויד בפונקציה מובנית להפיכת הכיוון של מחרוזת טקסט – למשל, במקרה של עברית הפוכה בקבצים מיובאים ממערכות מיושנות. השימוש בפונקציה פשוט מאד:
StrReverse(text)
אלא שכאן הקאץ': הפונקציה מיועדת לשימוש בקוד VBA בלבד. כלומר, אי אפשר לקרוא לפונקציה הנ"ל ישירות מגיליון האקסל.
אבל אל דאגה. כל מה שנדרש כדי להתגבר על המכשול הוא לכתוב פונקציית מעטפת קצרצרה ולמקמה במודול VBA:
1. לחיצה על ALT+F11
2. הוספת מודול: Insert – > Module
3. קופי-פייסט לקוד הבא:
Function StrRev(text As String) As String
StrRev = StrReverse(text)
End Function
4. בגיליון האקסל, שימוש בפונקציית המעטפת על התא עם הטקסט ההפוך:
בהצלחה!
ומה יקרה עם המחרוזת מעורבבת עם מספרים (שאינם מהופכים)?
ההיפוך בשיטה זו איננו "אינטליגנטי", ומתבצע ברמת התו הבודד. כלומר, המספרים יתהפכו אחד אחד. אם מראש הוזנו הפוכים, אז מעולה. אחרת, תקבל מספרים מהופכים בתוצאה.
אפשר לתת מענה לבעיה ע"י הפרדת המחרוזת למקטעים של טקסט ומספרים בנפרד, להפוך רק את חלקי הטקסט ואז לחבר חזרה למחרוזת אחת.
-צוות אא
ואיך אני שומרת קובץ כזה ?
אומר לי שלאניתן לשמו קובץ עם VB
שלום
על מנת לשמור קובץ עם קוד VBA, יש לבצע "שמירה בשם", ולבחור בפורמט: Excel Macro-Enabled Workbook.
הסיומת היא xlsm במקום xlsx.
בהצלחה
אחרי שמדביקים את הקוד, איך מפעילים אותו שיצטרף לנוסחאות?
זה מחזיר NAME
אה הסתדרתי…תודה!
היי
האם ניתן להוסיף לפונקציה TRUE .FALSE – לגבי התוכן של התא
כך שיחזיר תוצאת היפוך רק של הטקסט
StrRev = StrReverse(text,TRUE .FALSE)
מעולה! תודה!
אחרי שמדביקים את הקוד, איך מפעילים אותו שיצטרף לנוסחאות?
זה מחזיר NAME
אני לא מצליחה להתגבר על זה? אחרי שהדבקתי את הקוד מה צריך לעשות כדי להפעיל את הפונקציה??
תודה רבה! עובד מצוין
תודה!
תודה עובד מצויין