Question

我正在尝试将Userform文本框中的值输出到列中的下一个空单元格中：

mongoose.connection.on('error', function() {
    console.log('Could not connect to mongoDB');
});

mongoose.connection.on('connected', function() {
    console.log('Establish connection to mongoDB');
    kitty.save(function(err) { //(B)
      if (err) // ...
        console.log('meow');
    });
});

但是，它不起作用，我没有收到任何错误消息。

我在这里出错的任何想法？

由于

Answer 1

试试这个*更改为CommandButton2

     Private Sub CommandButton2_Click()
     Dim LastRow As Long
     With ThisWorkbook.Sheets("Output")
     LastRow = Cells(.Rows.Count, "H").End(xlUp).Offset(1, 0).Row
     Range("H" & LastRow).Value = TextBox1.Value
     End With
     End Sub

VBA将ComboBox值输出到Column中的下一个空闲单元格中

1 个答案: