A列にメールアドレスがあります、その中の
@以降のドメインだけB列に抜き出すマクロまたは関数をおねがいします。
A列 B列
abcd@docomo.ne.jo docomo.ne.jo
aaaa@ezweb.ne.jp ezweb.ne.jp
関数です。
A1に対して B1に記述します。
=IF(LEN(A1 & "@")-FIND("@",A1 & "@",1)=0,"",RIGHT(A1,LEN(A1)-FIND("@",A1,1)))
なお A2以降の場合は いったん B1に貼り付けたものを
コピーして 使用してください。
コメント(5件)
A列にメールアドレスが確実に入力されているのであれば、単に「=MID(A1,FINDB("@",A1)+1,LEN(A1))」でOKです。
利用させていただきます
回答ありがとうございました
コメントなのでポイント配分できませんでした
またの機会に回答欄にておねがいします。
丁寧な返答をいただきありがとうございます。
回答を投稿する前に質問ページを確認したところ、takntさんが既に回答を投稿されていたので、敢えてコメントにて回答させていただきました。