VBA 半角スペースを入れるには．．．

ＯＳはＸＰ、excelは2003を使っています。

'=======================================
'本文を作る、
'［A=社名、C=部署名、D=役職、E=名前＆様］
'=======================================
strMOJI = Range("A" & cellGyo).Value & vbCrLf & Range("C" & cellGyo).Value & vbCrLf & _
Range("D" & cellGyo).Value & Range("E" & cellGyo).Value & "様"

と組んでる中で、
Range("D" & cellGyo).Value 　と
Range("E" & cellGyo).Value 　の間に、
半角スペースを入れたいのですが、
どの様にすればいいのか教えて頂けないでしょうか？

部長山田太郎様　となってしまうのを
部長 山田太郎様　としたいと思っています。

説明不足な所もあるかと思いますが、
ご指摘頂ければ追記致します。
何卒よろしくお願い足します。

No.1 ベストアンサー 回答者： to-haya 回答日時： 2009/11/24 16:43

様をつけているように半角スペースを付与すれば良いかと思います。

Range("D" & cellGyo).Value & " " &Range("E" & cellGyo).Value & "様"

この回答へのお礼

回答頂いた通りで出来ました！

教えて頂いて初めて気が付きました。
まだまだ頭がかたいです．．．

ありがとうございました！

お礼日時：2009/11/24 17:19

No.2 回答者： hana-hana3 回答日時： 2009/11/24 17:15

半角スペースも文字列の一つですから、難しく考える事はありませんよ。

＆を使った結合方法を正しく理解されていれば誰でも解るかと思いますが？


strMOJI = Range("A" & cellGyo).Value & vbCrLf & Range("C" & cellGyo).Value & vbCrLf & _
Range("D" & cellGyo).Value & " " & Range("E" & cellGyo).Value & "様"

この回答へのお礼

>＆を使った結合方法を正しく理解されていれば誰でも解るかと思いますが？

おっしゃる通りです。
勉強不足です。
すみませんでした。

お礼日時：2009/11/24 17:22