חילוץ מילים ממחרוזת

[ש.ב.ח.]

איך ניתן לחלץ שני מילים מתוך שלוש באקסס (כלומר ששדה Y יקבל ערך של חלק משדה X -לא לפי תוים אלא לפי מילים)?

 

[moishy]

דוגמא לדבר:

Sub Demo()
    Dim strText As String
    Dim arr() As String
    
    strText = "אחד שתיים שלש"
    arr = Split(strText, " ")
    
    Debug.Print arr(0) & " " & arr(2)
End Sub

 

[ש.ב.ח.]

דוגמא לדבר: וכו'

תודה רבה!

ד.א. אין צורך ברווח אחרי הSpilt כי הברירת מחדל היא רווח (את האמת, בלעדיו לא הייתי מבין מה זה...)