范围应使用选定的单元格

Question

我正在尝试运行一个应该使用所选单元格作为范围的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

Answer 1

您可以使用Range("B11").Value。

代替Selection.Value

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

Answer 2

  range(selection.address)

保持简单：）