VBA コンボボックスの値をセルに入れる

Question

現在ユーザーフォームのコンボボックスに年、月、日を入力してもらって
その値を一つのセルにyyyy/mｍ/dｄの形で挿入したいです。
スラッシュを入れるとエラーになるのでやり方を教えてください。

Sub 日付入力()
Dim n , g , p , h As Long
n = ComboBox1.Text
g = ComboBox2.Text
p = ComboBox3.Text
h = n & / & g & / & p
Range("G5").Value = h
End Sub

Comments

[meg_]

> スラッシュを入れるとエラーになるのでやり方を教えてください。
そのコードとそのエラーを追記してください。

[321Kurumins]

スラッシュが抜けておりました。
現在＆を使って文字列の結合をしようとしてエラーが出ています。

[meg_]

> エラーが出ています。
エラー内容とエラー発生行を質問に追記しましょう。情報は多い方が回答が付きやすくなるかと思います。

Answer 1

下記の様に修正してはどうでしょうか？

Sub 日付入力()
    Dim n, g, p As Long
    Dim h As String
    n = ComboBox1.Text
    g = ComboBox2.Text
    p = ComboBox3.Text
    h = n & "/" & g & "/" & p
    Range("G5").Value = h
End Sub

Comments

[321Kurumins]

ありがとうございます。