VBA范围输出到单元格

Question

今晚我在 VBA 语法方面有点挣扎，感谢您的帮助。

我有一个用户表单，它通过 RefEdit 字段获取输入，并将其存储为变量（范围）。（这是通过

set DurationRange = range(me.refedit1.value)

这是我今晚早些时候提出的一个问题。

此

用户窗体采用此范围输入，并将范围输出到不同的工作表中以供进一步处理。我想做的基本上是再次输出变量。

我正在尝试使用此代码：

with worksheets("Data Output")
    .range("a1").offset(0, counter) = "Durations" 'this line just creates a header cell
    .range("a2").offset(0, counter) = DurationsRange 'this line should output the range into cell a2
End with

但是，尽管这会输出字符串，但它对范围没有任何作用。输出范围的正确方法是什么？我知道我可以为每个循环做一个，但我的范围太多了，这似乎效率低得令人难以置信。

Answer 1

有一些可能的答案：

1st. 如果您的DurationRange是单个单元格范围，则只需在此行中改进代码：

.range("a2").offset(0, counter) = DurationsRange.Value     'Value property is important here

2nd. 如果您的DurationRange由一列和几行组成，那么您可以使用以下解决方案：

.range("a2").offset(0, counter).Resize(DurationRange.Rows.Count) = DurationsRange.Value     'Value property is important here, too

显然，还有一些其他选项可以通过与上面的第二个示例类似的方式解决。