如何获取组合框的值到vba模块中的字符串？

-1

我有一个表格，example出口根据查询做xml。该查询是用组合框的条件构建的。组合框只有一个字段。我想要的是，在vba模块中，使用组合框的条件命名de xml文件。如何获取组合框的值到vba模块中的字符串？

实施例：03，卢卡斯，罗杰，23.

文件：myXML.Save组合框的值 “C：\睾丸中\ 03_Lucas_Roger_23.xml”

来源

2017-08-17 TDBSANTOS

这是在访问表单上？ –

是的，我使用访问2010 – TDBSANTOS

网络搜索“如何连接VBA中的字符串” – jsotola

可以使用此表达式：

FileName = "C:\teste\" & Replace(Replace(Me!YourCombobox.Value, ",", "_"), " ", "") & "xml" 

file: myXML.Save FileName

来源

2017-08-17 10:24:40 Gustav

th anks，但这不起作用 – TDBSANTOS

谢谢，它的工作:)我必须改变我！形式！frmMyForm！和那个工作。 – TDBSANTOS

太棒了！然后请标记为已回答。 – Gustav

您可以连接这样的值。我已经为null添加了一个额外的测试，因为如果在一个或多个组合框上未选择任何值，它将引发错误。

If IsNull(ComboBox1.Value) Or IsNull(ComboBox2.Value) Or IsNull(ComboBox3.Value) Or IsNull(ComboBox4.Value) Then 
    MsgBox ("Not all values selected!") 
Else 
    Dim myFileName As String 
    myFileName = "C:\teste\" & ComboBox1.Value & "_" & ComboBox2.Value & "_" & ComboBox3.Value & "_" & ComboBox4.Value & ".xml" 
    myXML.Save myFileName 
End If

来源

2017-08-17 10:28:31 MatSnow

我已经试过，但我得到：运行时错误'424'对象需要 – TDBSANTOS

然后，这应该是你的问题。我想你只是拼错了一个ComboBox的名字，因为这会抛出424错误。 – MatSnow

如何获取组合框的值到vba模块中的字符串？

回答

相关问题