學習資源：《Excel VBA從入門到進階》第35集 by蘭色幻想

本課的示例都在立即窗口展示運行結果，要在立即窗口展示的話要使用“Debug.Print”。

Debug.Print 將代碼執行結果顯示在“立即窗口”中，但不影響程序執行。

一、字符串截取

1.left,right,mid,Len

這幾個函數在Excel中也有，具體的用途如下：

left(字符串，截取長度) 返回從字符串左邊算起指定截取長度的字符。
right(字符串，截取長度) 返回從字符串右邊算起指定截取長度的字符。
mid(字符串，截取起始位置，截取長度) 返回從字符串左邊算的截取起始位置起的指定截取長度的字符。
Len（字符串） 返回字符串長度。Sub z1()Dim srsr = "Excel精英培訓網"Debug.Print Left(sr, 5) '結果：ExcelDebug.Print Right(sr, 5) '結果：精英培訓網Debug.Print Mid(sr, 6, 2) '結果：精英Debug.Print Left(sr, Len(sr) - 1) '結果：Excel精英培訓 End Sub

可以從視圖選項調出“立即窗口”，或者按快捷鍵Ctrl+G

2.split

split 將字符串按特定的字符分開，返回的是一個一維數組，數組的起始下標為0。Sub z2()Dim sr, arrsr = "Excel的精的英的培訓網"arr = Split(sr, "的")Debug.Print UBound(arr)Debug.Print arr(0) End Sub

運行結果

數組arr

3.val

val 返回字符串內的數字，遇到非數字字符結束運算。Sub z3()Dim srsr = "89.90美元"Debug.Print Val(sr) End Sub

val遇到非數字字符就結束運算。

經常有人弄混val和value，val是函數，value是屬性，引用value需要對象。

4.&

& 連接兩個字符串。 Sub a4()Debug.Print "a" & "b"End Sub

5.join

join(數組，連接的字符) 連接字符串。Sub a5()Dim sr, arrsr = "Excel-精英-培訓網"arr = Split(sr, "-")Debug.Print Join(arr, "+") End Sub

總結

以上是生活随笔為你收集整理的截取指定字符前_VBA学习笔记35-1:字符串拆分与组合的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。