こんにちは、

300件程のメールアドレスをExcelで管理しているのですが、
例えばセルに「bondo1119」と記載していて、そのセルに「@goo.co.jp」という
ドメイン名を、bondo1119の後に一括でコピーしたいのですが、
何かよい方法はないでしょうか。

どなたかご存知の方がいらっしゃいましたら、アドバイスいただけないでしょうか。
よろしくお願いいたします。

このQ&Aに関連する最新のQ&A

アンサープラス

こちらで紹介されている「置換」、「&」を使う方法は、どちらも最近のバージョンで有効ですね。


また、「CONCATENATE関数」を使うという手段もあります。

・CONCATENATE 関数 - Office サポート
https://support.office.com/ja-jp/article/CONCATE …

A 回答 (3件)

実体が無くて良いなら表示形式をユーザー定義で


@"@goo.co.jp"
とする。

実体が必要な場合は
=A1&"@goo.co.jp"
で別セルに設定後行方向にコピー、
列をコピーして元の列に形式を選択して貼り付けで値として貼り付ける。
    • good
    • 20
この回答へのお礼

mshr1962さん、pbforceさん lovesensさん、ご返信ありがとうございました。
「=A1&"@goo.co.jp"」で、全てのアカウント名に、ドメイン名をつなげることが
できました。
アドバイス、ありがとうございました。

お礼日時:2005/08/03 19:37

EXCELの標準機能にあります、検索置換でいかがでしょうか。


つまり
検索「bondo1119」
置換「bondo1119@goo.co.jp」
と打ち込むと、「bondo1119」→「bondo1119@goo.co.jp」
になりますよ。
    • good
    • 1

【bondo1119】を【bondo1119@goo.co.jp】に置換しましょう。



置換は【編集】の【検索】で【置換】を選んでください。
    • good
    • 3

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QEXCELで縦の行全てに一括して文字を追加。

EXCELにて、縦の行全てに一括して文字を追加する方法はありますでしょうか?
同じ文字を入力するのはやや面倒なので。。
ご教授お願い致します。

Aベストアンサー

その列に既に入力されている文字が全て同じなら、追加は簡単です。

例として、A列の全てのセルに"goo"を追加入力する場合を書きます。

(1)まず、A列(縦の行って列の事ですよね?)を選択。
(2)そのままの状態で数式バーの最後尾に"goo"と入力し、確定。
(3)次にctrlを押しながらenterを押す。

これでA列全てのセルの文字列に"goo"が追加されます。

ご質問の意図と違っていましたらごめんなさい。

QEXCELで文字列の後ろに同じ文字列を追加するには?

初心者です、教えてください。
ワークシート内の一行の文字列全てに同じ文字を追加したいのですが、方法を教えてください。
初歩的な質問で恐縮ですが、どうかよろしくお願いします。

Aベストアンサー

A1の文章の最後に「ほげー」をつけたいときは、
B1に
=A1&"ほげー"
と入力して、対象となる下までフィルダウン。

そのあと、B列をコピー⇒形式を選択して貼り付け⇒値
最後にA列を削除すればできます。

QExcel 複数のセルに同じ文字を一斉追加したい!

いつも皆様にはお世話になっております。
次のことご教授いただけると助かります。

今日新しくオフィス電話を替えました。
短縮ダイヤルをエクセルにて編集していたのですが
電話屋さんの話によると電話番号の後に「#」を入れろとのこと。
そこでセルに納まっているたくさんのTEL番号のの後に一斉に
挿入したいのですが方法がわかりません。
Excelは2003です。

お助けください。
お願いいたします。

Aベストアンサー

一列、作業列を利用しますが、A列に電話番号あるとして
=A2&"#" と入れて下までコピィ 最後に#が表示されますので
その列の範囲を選択、コピィ、
電話番号の列(A列)選択して、ツールバーの編集=>形式を選択して貼り付け
ウィザードの中の 値 にチェックをいれてOK

QExcel 文字列の前後に、特定の文字を付加したい

Excelで、ある列に不規則な文字列がならんでいます。
その文字列の前後に、いっせいに好きな文字を付加したいのです。
例えば、「AAA」という文字列の前後に
「BBBACCC」といったように
AAAといった文字列にBBBやCCCと一斉に付加したいです。
AAAはアルファベットや日本語等さまざまなのですが、
どうすればいいでしょうか?
教えてください。

Aベストアンサー

& で繋ぎます。

A1 セルの文字の前後に、ABC と DEF を付けたいなら、
別のセルに下記のような式を入れます。

="ABC" & A1 & "DEF"

Q(Excel)あるセルに文字を入力しただけで、同じブック内のほかのワークシートにも、同じ文字が自動的に入るようにするには?

こんにちは。
質問内容はタイトルのとおりです。

あるワークシートのあるセルに文字を入力すると、ほかのワークシートのセルにも同じ文字が自動的に書き込まれる方法を知りたいです(ブックは同じ)。複数のワークシートを制御するには、やはりマクロを使うのでしょうか?

よろしくお願いします。

Aベストアンサー

clam_chowderさん、こんにちは。

Sheet1のA1にたとえば「100」と入力しますね。
Sheet2のA1に、これと同じ数値を表示するには、
 =Sheet1!A1
でOKです。

数式をいれるのが苦手なら、
Sheet2のA1セルで「=」を入力すると、数式入力状態に入りますから、
ここでSheet1のシートタブをクリックし、
リンクしたいA1セルをクリックしてEnterすると、
自動的にさきほどと同じ式が入ります。

QEXELで文字列の先頭に文字を挿入したい(置換)

EXEL2003です。
セルに文字列が並んでいます。
それの先頭にある文字を挿入するにはどうしたらよいのでしょうか?
「置換」で先頭とか、末尾を指定する方法がありますか?
よろしくお願いします。

Aベストアンサー

#01です。変換したい文字列のセル範囲が決まっているなら、#02さんの方法で補助セルに変換して、その結果を「コピー」→「値として貼りつけ」で書き戻す方法が良いと思います。

もしシート中の全ての「文字列」が入っているセルの先頭に「ある文字」を挿入するなら、以下のマクロになります。

Sub Macro4()
Dim r As Range
 For Each r In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, 2)
  r.Value = "ある文字" & r.Value 'この行を修正
 Next r
End Sub

また「文字列」だけではなく「数値」も同様にするなら、SpecialCells(xlCellTypeConstants, 2)の数字を2→3に変更してください。

末尾に「ある文字」をつけたいのなら
r.Value = r.Value & "ある文字"
に変更してください。

マクロはALT+F11でVBE画面を開き、「VBAProjectエクスプローラのシート名右クリック」→「挿入」→「標準モジュール」で表示される画面にペーストして下さい。実行はALT+F8を押して、マクロ名を選択します

マクロで変換した結果はUNDOで戻せませんので、シートはコピーしてから試してくださいね。

#01です。変換したい文字列のセル範囲が決まっているなら、#02さんの方法で補助セルに変換して、その結果を「コピー」→「値として貼りつけ」で書き戻す方法が良いと思います。

もしシート中の全ての「文字列」が入っているセルの先頭に「ある文字」を挿入するなら、以下のマクロになります。

Sub Macro4()
Dim r As Range
 For Each r In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, 2)
  r.Value = "ある文字" & r.Value 'この行を修正
 Next r
End Sub

また「文字列」だけで...続きを読む

Q多数の計算セルに一括で同一の関数を追加したい

エクセル2007で、

A1:=X/Y
A2:=S/T
A3:=A/B

といった、すでに数式の入力されたセルに、

A1:=round(X/Y,3)
A2:=round(S/T,3)
A3:=round(A/B,3)

となるようRound関数を追加したいのですが、手入力でコピーアンドペーストする以外に何か方法はあるでしょうか?
後々に計算が続くため、出来れば「B1=round(A1,3)」の様なやり方は避けたいと思っています。
置換でまずroundを追加しようとしても、括弧が対応していないとエクセルに怒られました。

Aベストアンサー

 以下の様に操作されると宜しいかと思います。

A1~A3の範囲をまとめて範囲選択
  ↓
Excelの置換機能を使用して、A1~A3の範囲内にある全ての「=」(鉤括弧は不要)を「 =」(「『空白+『=』」、鉤括弧は不要)に置換
  ↓
適当な未使用の列(ここでは仮にB列とします)の1行目のセル(B1セル)に次の関数を入力

=REPLACE(A1,2,1,"=ROUND(")&",3)"

  ↓
B1セルをコピーして、B2~B3の範囲に貼り付け
  ↓
B1~B3の範囲をコピー
  ↓
A1セルを右クリック
  ↓
現れた選択肢の中にある[形式を選択して貼り付け]をクリック
  ↓
現れた「形式を選択して貼り付け」ダイアログボックスの中にある「値」と記されている箇所をクリックしてチェックを入れる
(或いは、「貼り付けのオプション」の中にある「123」と記されたアイコンをクリック)
  ↓
「形式を選択して貼り付け」ダイアログボックスの[OK]ボタンをクリック
  ↓
A1~A3の範囲をまとめて範囲選択
  ↓
Excelの置換機能を使用して、A1~A3の範囲内にある全ての「 =」(「『空白+『=』」、鉤括弧は不要)を「=」(鉤括弧は不要)に置換


 以上です。
 列記しますと長くなりますが、それほど複雑な操作では御座いません。

 以下の様に操作されると宜しいかと思います。

A1~A3の範囲をまとめて範囲選択
  ↓
Excelの置換機能を使用して、A1~A3の範囲内にある全ての「=」(鉤括弧は不要)を「 =」(「『空白+『=』」、鉤括弧は不要)に置換
  ↓
適当な未使用の列(ここでは仮にB列とします)の1行目のセル(B1セル)に次の関数を入力

=REPLACE(A1,2,1,"=ROUND(")&",3)"

  ↓
B1セルをコピーして、B2~B3の範囲に貼り付け
  ↓
B1~B3の範囲をコピー
  ↓
A1セルを右クリック
  ↓
現れた選択肢の中にある[形式を選択して貼...続きを読む

Qエクセルで重複しているデータの抽出のしかたを教えてください。

エクセルで重複しているデータを抽出したいのですが・・。なにぶん初心者なもので簡単な方法があればよいのですが・・。
A列に日付 B列に企業名このデータが300件ほどあります。

 Å列      B列
1月 1日    AAAA社
1月 4日   BBBB社
1月 8日   CCCC社
2月 1日   BBBB社
2月20日    DDDD社
3月 2日   AAAA社

と、あるとしてB列の企業名が重複しているものを抽出したいのですが・・・。この場合 AAAA社とBBBB社ですが。
これを簡単に抽出する方法はないでしょうか?
教えてください お願いいたします。

Aベストアンサー

企業名がセルB2からセルB300まで入力されていると仮定します。
セルC2に IF(COUNTIF($B$2:B2,B2)>1,"*","") を入力し、セルC300までコピーして下さい。すると重複したデータの二番目以降に "*" のマークが付きます。
(注) 数式を下のセルまでコピーするため、COUNTIF($B$2 は絶対参照にして下さい。

Qエクセルで、条件に一致した行を別のセルに抜き出す方法

エクセルで、指定した条件に一致するセルを含む行をすべて抜き出す方法が知りたいです。

たとえば、

<A列> <B列> <C列>
7/1 りんご 100円
7/2 ぶどう 200円
7/2 すいか 300円
7/3 みかん 100円

このような表があって、100円を含む行をそのままの形で、
別のセル(同じシート内)に抜き出したいのですが。

7/1 りんご 100円
7/3 みかん 100円

抽出するだけならオートフィルターでもできますが、
抽出結果を自動的に、別の場所に、常に表示させておきたいのです。

初歩的な質問だと思いますが、検索しても分からなかったので、よろしくお願いします。

Aベストアンサー

同じ質問が結構よく出てますが、そんなに初歩的でもありません
別シートのA1セルに「100円」と入力し、そのシートの任意のセルに以下の式を貼り付けて下さい。後は、下方向、右方向にコピー。
日付のセル書式は「日付」形式に再設定してください

=IF(COUNTIF(Sheet1!$C:$C,$A$1)>=ROW(A1),INDEX(Sheet1!A:A,LARGE(INDEX((Sheet1!$C$1:$C$500=$A$1)*ROW(Sheet1!$C$1:$C$500),),COUNTIF(Sheet1!$C:$C,$A$1)-ROW(A1)+1)),"")

データ範囲は500行までとしていますが、必要に応じて変更して下さい

Qエクセルで数字の頭に0を追加する方法はありますか?

エクセルのVLOOKUP関数を使って検索をしようと思いますが、
検索する番号が一つが6桁の番号で表示されており、もう片方が7桁の番号で表示されています。
つまり、6桁は頭に0が付いていなくて、7桁には頭に0が付いています。
【例】 6桁=123456、7桁=0987654

ですから同じ表示にしたいのですが、出来れば6桁の頭に0を付けたいのです。
【例】 6桁=123456 → 7桁=0123456

どうすれば、変換できるかよい方法がありましたら教えて下さい。よろしくお願いいたします。

なお、対象セルは3千個程あるので、とてもじゃないけど一個づつは出来ません。
また、当方素人なので出来れば判り易い方法でお願い致します。

Aベストアンサー

範囲選択をして右クリック
セルの書式設定
 ↓
表紙形式
 ↓
ユーザー定義
 ↓
種類のところに 0000000
と記入すれば頭に0が付きます。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング