VBA用户表单输入数据并在下一个空行编号

时间:2016-07-28 10:36:18

标签: excel-vba vba excel

我是VBA初学者,每次提交值时,我都会尝试将自动编号(1,2,3等)的代码输入到单元格(从A2,A3,A4等开始)数据行。我尝试在google上查找,但所有示例和答案都不符合我的要求。

目前,我必须在工作表上手动编辑和编号。如果我删除了其中一行并手动更新列表编号。下一个提交的数据将在下一个空行继续,同时更新列表编号。我已经得到的其余代码。

你能帮我写一下Cell(erow,1)代码进行自动编号。提前致谢。 这是我的代码:

testVar

这是我的工作表的图像:

sheet1

这是userform:

Userform

1 个答案:

答案 0 :(得分:1)

只需使用

Cells(erow, 1) = erow-1