在VBA Excel中

Question

刪除空格我從細胞移動文本一些代碼，細胞

Dim startIndex As Integer 
Dim toIndex As Integer 
Dim f As String 
Dim g As String 

For startIndex = 50 To 60 Step 2 
toIndex = Str(startIndex + 1) 
f = "F" & Str(toIndex) 
g = "G" & Str(startIndex) 
Range(f).Value = Range(g).Value 
Range(g).Value = "" 
Next startIndex 

但變量f有「F 51」值，而不是「F51」。

如何解決這個問題？ p.s.這是我在vba上的第一個代碼。

Answer 1

你可以TRIM()的toIndex或REPLACE空間的最終結果，即

Replace ("alphabet", "a", "e") 'would return "elphebet" 

例如從這裏升起：http://www.techonthenet.com/excel/formulas/replace.php

所以......

f = Replace (f, " ", "") 

Answer 2

您應該使用
CStr
不
Str

則需要爲Str

移除unncessary空間

即

f = "F" & CStr(toIndex) 
g = "G" & CStr(startIndex) 

從Excel幫助沒有解決方法當數轉換爲字符串，一領先的空間總是保留給號碼的符號。