0

我正在尝试运行一个 Makro，它应该使用选定的单元格作为范围。

而不是 Range("B1") 它应该是 Range("selectedCell")

我的代码是这样的，我希望 makro 拆分所选单元格中的数据。

Sub tst()
Dim X As Variant
X = Split(Range("B11").Value, ",")
Range("B11").Resize(UBound(X) - LBound(X) + 1).Value = Application.Transpose(X)
End Sub
4

2 回答 2

1

而不是Range("B11").Value，您可以使用Selection.Value.

Selection可以超过 1 个单元格，因此您可能应该先检查一下。

于 2013-10-23T14:23:16.350 回答
0 
  range(selection.address)

把事情简单化 ：）

于 2013-10-24T12:37:07.467 回答