在VBA中将剪贴板内容读入数组

Question

  Range("C" & CStr(j) & ":C" & CStr(k)).Select
  Range("C" & CStr(j) & ":C" & CStr(k)).Copy

我正在将列的内容读入剪贴板，我想遍历每个元素。

问题是如何循环使用它？

剪贴板的内容如下所示：

1234
21345234
1234512345
123452135
123451235
2345

或者我应该循环通过J和K？你能告诉我怎么做这件事谢谢

Answer 1

您不需要使用剪贴板，而是：

Dim workingArray as Variant

workingArray = Range ("C" & CStr(j) & ":C" & CStr(k))

现在你可以通过workingArray工作了，注意它被视为一个二维数组。

Answer 2

您可以遍历范围而无需任何奇怪的语法，如下所示：

Dim cel as Range
For Each cel in Range(Cells(j,3), Cells(k,3))
    MsgBox cel.Value
Next cel

请注意，在这种情况下，“3”表示范围位于第三个​​列中（即“C”）