例如：
| ||Column A|
|Row: 4 || 23,24 |
如果我有兩個變數，
Dim a As Integer
Dim b As Integer
如何讓“a”攜帶數字 23，而“b”在 VBA 中攜帶數字 24？
提前致謝！
uj5u.com熱心網友回復：
- 您將該單元格的值作為字串讀取。
- 你
Split用來把它變成一個由兩個字串組成的陣列。 - 您將該陣列中的兩個字串都轉換為整數，很可能使用該
CInt()函式。
uj5u.com熱心網友回復：
Dominique 是對的，盡管我相信您甚至不需要使用該CInt()函式，因為您將字串存盤到一個已經初始化為整數的變數中（即：它會自動轉換）。
這里有兩個選項（假設單元格 A4 的值為“23,24”）：
Sub Option1()
Dim c As Range: Set c = Range("A4")
Dim a As Integer
Dim b As Integer
'Using left()/right()
Dim cellValue As String, commaPosition As Long
cellValue = c.Text
commaPosition = InStr(cellValue, ",")
a = Left(cellValue, commaPosition)
b = Right(cellValue, Len(cellValue) - commaPosition)
Debug.Print a '23
Debug.Print b '24
Debug.Print a b '47
End Sub
Sub Option2()
Dim c As Range: Set c = Range("A4")
Dim a As Integer
Dim b As Integer
'Using Split()
Dim cellValues As Variant
cellValues = Split(c.Text, ",")
a = cellValues(0)
b = cellValues(1)
Debug.Print a '23
Debug.Print b '24
Debug.Print a b '47
End Sub
兩者的執行速度大致相同。
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/417860.html
標籤：
上一篇：以編程方式在Excel圖表的選擇資料源框中選擇X軸標簽
下一篇：從整列VBA中洗掉空格