2017-08-17 22 views
-1

私はexampleのエクスポートがクエリに基づいてxmlを実行するというフォームを持っています。そのクエリはコンボボックスの条件で構築されます。 コンボボックスには1つのフィールドしかありません。 私が望むのは、vbaモジュールでは、コンボボックスの条件でde xmlファイルを指定することです。コンボボックスの値をvbaモジュールの文字列に変換するにはどうすればよいですか?

例:コンボボックスの値:03、ルーカス、ロジャー、23

ファイル:myXML.Save "C:\精巣\ 03_Lucas_Roger_23.xml"

+0

アクセスフォームにありますか? –

+0

はい、私はacessを使用しています – TDBSANTOS

+0

ウェブ検索 "VBAで文字列を連結する方法" – jsotola

答えて

0

あなたはこの表現を使用することができます

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

file: myXML.Save FileName 
+0

thしかし、これは動作しません – TDBSANTOS

+0

ありがとう、それは働く:)私は私を変更する必要があります!フォーム!frmMyForm!その仕事。 – TDBSANTOS

+0

素晴らしい!それから答えてください。 – Gustav

0

このような値を連結することができます。 1つまたは複数のComboBoxで値が選択されていないと、エラーが発生するため、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 
+0

私はすでにそれを試みましたが、私は得る:実行時エラー '424'オブジェクトが必要 – TDBSANTOS

+0

これはあなたの質問だったはずです。私は424エラーをスローすることができるので、ちょうど1 ComboBoxの名前のスペルミスが間違っていると思います。 – MatSnow

関連する問題