Excelのシートでメールアドレスの＠より前を抽出するやり方を教えてください。

Excel上で、メールアドレスの＠マークより前を他の列に抜き出したいのですが、やり方が分かりません。
どの関数を使えばいいのでしょうか？
どなたかお知恵を貸してください。
どうぞよろしくお願いします。

No.1 ベストアンサー 回答者： noname#99913 回答日時： 2009/02/09 10:09

A1にアドレスが入力してあるとして、

=LEFT(A1,FIND("@",A1)-1)

この回答へのお礼

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

お礼日時：2009/02/12 08:16

No.4 回答者： web2525 回答日時： 2009/02/09 23:34

データが多数あるようなら

列をコピーしてそのまま貼り付け
貼り付けた列を選択→検索文字　＜@*＞　置換え後の文字を空欄のままですべて置換え。
これで前半部分のみ残ります。

この回答へのお礼

置換でも出来るのですね。アドバイスありがとうございます。

お礼日時：2009/02/12 08:16

No.3 回答者： marbin 回答日時： 2009/02/09 10:50

一般関数で出来るのでユーザー定義関数の出る幕は

ないですが、こんなのでも出来る、ということで・・・。

ユーザー定義関数です。
標準モジュールに記述し、

=hidari(A1,"@")
という風にセルに式を入れたら、
A1の値の"@"で区切った左部分(@が複数ある場合は一つ目の"@"の左部分)
を取得します。

Function hidari(ByVal mystr As String, moji As String)
hidari = Split(mystr, moji)(0)
End Function

この回答へのお礼

いろいろなやり方があるのですね。参考になりました。ありがとうございました。

お礼日時：2009/02/12 08:17

No.2 回答者： imogasi 回答日時： 2009/02/09 10:29

LEFT以外の関数でも出来るということで

=REPLACE(A2,FIND("@",A2),LEN(A2)-FIND("@",A2)+1,"")
他にＭＩＤ，ＳＵＢＳＴＩＴＵＴＥ関数でも出来るとおもう。
@を見つけるのはＦＩＮＤ関数のほかに、ＳＥＡＲＣＨ関数もある。

この回答へのお礼

勉強になります。ありがとうございました。

お礼日時：2009/02/12 08:17