【问题标题】:Change value in textbox from combobox从组合框更改文本框中的值
【发布时间】:2026-01-17 08:00:01
【问题描述】:

我正在尝试根据组合框的值更改文本框的值。这应该是相当直接的,但我正在努力解决这个问题。

Private Sub Combobox1_Change()
 x = Combobox1.Value
 textbox1.Value = Worksheets("Sheet1").Range("B") & x
End Sub

附:为了清楚起见,我从来都不是专业的程序员或代码编写者。

【问题讨论】:

  • 如果x是一个数字那么Textbox1.Value = Worksheets("Sheet1").Range("B" & x).Value
  • 注意:您必须确保 combobox1 更改事件返回有效数字,否则您将收到错误消息。你需要处理它。
  • ComboBox 的Value 是由ListIndex 属性指示的BoundColumn 行中的任何内容,不一定是您在屏幕上看到的内容。如果您在 ComboBox 中输入了不在其列表中的内容,则会有所不同。试试Text 属性。

标签: excel vba combobox textbox


【解决方案1】:

我认为你的问题是括号放错地方了。

Range("B" & x).value

我也更喜欢这个版本:

Range("B1").Offset(x - 1).Value

【讨论】: