Question

基本问题，入门VBA

StoreValueLocCol = Left(StoreValueLoc, 1)
StoreValueLocRow = Int(Right(StoreValueLoc, 2) + 1)
StoreValueLoc = StoreValueLocCol & Str(StoreValueLocRow)
MsgBox(StoreValueLoc)

我想在excel VBA中连续一行，但是当我连接字符串时，它们之间存在一个空格。

我使用它作为解决方案，但我想找出空间存在的原因

StoreValueLoc = Replace(StoreValueLoc, " ", "")

Answer 1

Str增加了一个领先的空间。使用CStr或仅连接：

StoreValueLoc = StoreValueLocCol & CStr(StoreValueLocRow)

或：

StoreValueLoc = StoreValueLocCol & StoreValueLocRow

Answer 2

让人们了解数据类型等等，这样我们就可以很好地了解您要完成的任务。

我假设StoreValueLoc是一个Range变量。如果您要分隔列和行，可以使用.表示法来使用内置的VBA函数。见下文：

storeValueLocRow = storeValueLoc.Row
storeValueLocCol = storeValueLoc.Column
MsgBox(storeValueLocRow & ", " & storeValueLocCol)

注意：如果范围不是单个单元格列和行函数将返回范围中的第一列和第一行

为什么中间有空间？ VBA优秀

2 个答案: