Excel VBA .End(xlUp).Offset(1, 0).Row

Question

创建用户表单以将数据添加到 VBA 中的数据库。我想做的很简单；到 select 最后填充的行，然后跳到下一行中的下一个空单元格。

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

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

Answer 1

.End(...没有什么可参考的。如果您想添加换行符，请编写：

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

注意 _ 在第一行末尾前面有一个 space。这将连接两条线，形成一个有效的陈述。

或者，将两行写成一行：

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

excel