Question

我一直在四处寻找！什么都行不通。如初。

我希望能够填写一份表格（让我们说两个文本框2）当您单击该按钮时，它应该在所有其他填充的行下面添加一个新行，并将文本框的数据放入该行的单元格中。

我没有做任何事情:(

有没有人有任何想法？我的表格有： Textbox1的 TextBox2中工作表称为Sheet1 （我在测试时保留了所有默认设置）

任何帮助都是史诗般的......

一旦我对这个位进行了排序，我就可以修改以实现我想要实现的目标。但是这个基本的“用一些数据添加一行”只会让我感到害怕..它不是那么难吗？

由于 ģ

Answer 1

我相信你可以遵循类似的逻辑:(点击后）

查找上一个填充的行
Insert an empty row下的
从文本框中抓取数据并将其复制到正确的列

这有帮助吗？如果没有，你有什么问题？我很乐意提供更多帮助。

Answer 2

这样的事可以让你开始。这假定您的第一个文本框将填充A列，第二个文本框填充B列。

    Sub InsertText()
        Range("A65000").End(xlUp).Offset(1, 0).Select
        ActiveCell.Value = TextBox1.Value
        ActiveCell.Offset(0, 1).Value = TextBox2.Value
    End Sub

如果您只是在最后一个填充的单元格下方填写，我认为您不需要添加另一行。如果是的话

    ActiveCell.EntireRow.Insert

Excel，带有文本框的VBA表单。单击按钮。使用文本框中的数据在工作表中创建新行

2 个答案: