用户窗体的名称框

我创build了一个带有文本框的用户窗体（userform6）。 我需要给最后5行的名字。

这是我正在使用的代码。 该代码也select了最后五行，但出现错误。

Dim n As Long n = 5 Cells(Rows.Count, "A").End(xlUp).Offset(1 - n). _ Resize(n).EntireRow.Select Selection.Name = UserForm6.TextBox8.Text 

我得到了一个运行时错误1004，错误突出显示“selection.name = userForm6.TextBox8.Text”。 我也检查了空间，但没有成功。

任何帮助将不胜感激。

Answer 1

你实际上是在寻找一个Range – not Cells 。 另外，你不需要Select它，以便Name它; 那么为什么要慢呢？

所以在这里我们去：

 Dim n As Long n = 5 Range("A" & Rows.Count).End(xlUp).Offset(-n + 1).Resize(n).EntireRow.Name = UserForm6.TextBox8.Text