如何将用户名粘贴到单元格中?

时间:2018-01-05 14:01:14

标签: excel vba excel-vba

我需要将Sheet1中的文本框内容粘贴到Sheet9中“B”列的最后一行。通过使用 Enter 键,将Sheet1中的文本框中的文本框内容(字符串)插入到Sheet9列“B”的最后一行中没有问题。但是,我发现很难将用户名添加到列“C”中的最后一行,与Sheet9中“B”列的最后一行相邻。

这里我将Sheet1中的文本框内容复制到Sheet9中“B”列的最后一行,并尝试将用户名放在Sheet 9中“C”列的最后一行。

itemsPerPage

1 个答案:

答案 0 :(得分:2)

由于您要在行C中插入UserName,该行应该是B列中的第一个空行,您只需先将UserName放在C列中,然后在B列中插入TextBox值。 / p>

请试一试......

.Range("B" & Rows.Count).End(3)(2).Offset(0, 1) = Environ("UserName")
.Range("B" & Rows.Count).End(3)(2) = Textbox1