将剪贴板中的内容读入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工作，请注意，它会被视为一个两-D数组。

Answer 2

您可以通过，无需任何怪异语法这样的范围内循环：在这种情况下的“3”是指范围在第三柱（其是'

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

注C'）