Excel VBA 用户表单：如何将数据从列表框传输到工作表单元格？
Excel VBA Userforms: How do I transfer data from a List Box to a worksheet cell?
我有一个包含三个选项的列表框：圆柱体、椭圆体和截锥体。用户选择其中之一并点击提交按钮。我想做的是在单击提交按钮时将他们的选择写在我工作表的一个单元格中。我该怎么做？
ListBox 控件对象将有一些名称。因此，如果您的表单名为 frm 并且列表框对象名为 lstBox，您可以将其选定的值移动到一个范围，myRange，如下所示：
myRange.value = frm.lstBox.text
如果你想遍历一个范围内的单元格，看起来像这样：
Dim cell as range
For each cell in myRange
cell.value = frm.lstBox.text
next cell
上面的代码会将列表框中的值写入范围内的每个单元格。
我有一个包含三个选项的列表框：圆柱体、椭圆体和截锥体。用户选择其中之一并点击提交按钮。我想做的是在单击提交按钮时将他们的选择写在我工作表的一个单元格中。我该怎么做？
ListBox 控件对象将有一些名称。因此，如果您的表单名为 frm 并且列表框对象名为 lstBox，您可以将其选定的值移动到一个范围，myRange，如下所示：
myRange.value = frm.lstBox.text
如果你想遍历一个范围内的单元格，看起来像这样：
Dim cell as range
For each cell in myRange
cell.value = frm.lstBox.text
next cell
上面的代码会将列表框中的值写入范围内的每个单元格。