循环用户表单

时间:2014-12-01 14:48:25

标签: vba loops userform

我创建了一个用户表单,用于将文本框和组合框中的数据传输到电子表格。

我想多次运行此表单,并且每次都要将数据传输到下一列。我的列可能不是空的,我希望它们被覆盖。此外,我有一些合并的列,我希望数据写在第3个下一列。

例如,我在单元格C3中输入了第一个值,我希望下一个值在F3中,因为D3和E3已合并且不存在。

我尝试过使用类似的东西:

ecolumn = Sheet14.Range("A1").End(xlToRight).ActiveCell.Offset(0, 1)

但没有成功。我试过offset(0,3),我试过ecolumn+3但没有任何作用。它要么不接受每3列移动,要么在第二次尝试时停止。

1 个答案:

答案 0 :(得分:0)

不知道你的所有代码,它会是这样的:

'Code that inserts data into cell "C#"
ecolumn = InsertRng.Offset(0, 3)
'InsertRng should be replaced by whatever variable you define the range where you insert the data from your textbox/combobox into cell "C#"
ecolumn.Value = 'Whatever you wanted to put in that offset range