Question

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

我有一个Userform，它通过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

第二。如果您的DurationRange由一个列和一些行组成，那么您可以使用此解决方案：

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

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

VBA范围输出到单元格

1 个答案: