エクセルでセルの連結の逆

エクセルでA1に「山田」、B1に「太郎」と入っていて、「山田太郎」としたい場合には
=A1&B1
と入力し、セルを連結させますよね。

それの逆で、すでにA1に「山田 太郎」と入っているものを「山田」と「太郎」にわけることはできますでしょうか。
ちなみに「山田」と「太郎」の間にはスペースが入っています。

No.1 ベストアンサー 回答者： shindyJr 回答日時： 2003/07/28 19:14

こんにちは。

分割したいセルを選択して
＜データ＞
＜区切り位置＞
＜スペースによって右・・・＞を選択して「次へ」「完了」ボタン押下。

でスペースの前後の単語が左右ふたつのセルに分割されます。

No.4 回答者： sakenomo 回答日時： 2003/07/29 00:08

間に入っているスペースが、全角でも半角でもかまわない方法ということで。

性が、

=LEFT(A1,SEARCH(" ",ASC(A1))-1)

名が、

=MID(A1,SEARCH(" ",ASC(A1))+1,LEN(A1))

ではいかがでしょうか。

式中の" "の間には半角スペースが入っています。
入力の際にはご注意ください。

No.3 回答者： imogasi 回答日時： 2003/07/28 21:05

#1のご回答のVBA版です。

Sub test01()
Dim cl As Range
For Each cl In Selection
p = Split(cl, "　")
cl.Offset(0, 1) = p(0)
cl.Offset(0, 2) = p(1)
Next
End Sub
スペースはここでは全角スペース。半角なら= Split(cl, "　")の””の中を半角にすること。
ALTキーを押しながら、F11キーその後I、その後Mを押すと
標準モジュールの画面になる。そのコードウインドウ
（右側フレーム）に上記をコピペ。
F5（実行）を押す。
A列の名前がB、C列に分離します。

No.2 回答者： moon00 回答日時： 2003/07/28 19:25

関数で分割できるか、という解釈をしました。

姓は「=LEFT(A1,FIND("　",A1)-1)」
""の中は、姓と名の間に入っているスペースを入れます。（半角or全角スペースということです）
スペースの位置を探し、左からその１文字前までを表示。

名は「=RIGHT(A1,LEN(A1)-FIND("　",A1))」
名前全部の文字数からスペースの位置までを引く＝名前の先頭
右側から名前の先頭までを表示。

こんな感じでいかがでしょう。