Excel VBA .End（xlUp）.Offset（1,0）.Row

Question

使用userform将数据添加到VBA中的数据库。我想做的事情很简单;选择最后填充的行，并跳到下面行中的下一个空单元格。

添加了突出显示问题的屏幕截图。

问题很简单，我做错了什么，以及如何解决？

Answer 1

.End(...无需参考。如果您想添加换行符，请执行以下操作：

Irow = ws.Cells(Rows.Count, 1) _
.End(xlUp).Offset(1,0).Row

在第一行末尾看_前面有空格。 这将连接两条线，形成一个有效的声明。

或者，只需将两行写为一行：

Irow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1,0).Row