エクセルの一つのセルに複数行の文字を入れる方法を教えてください。

メモ帳などで入力したこのような文章をエクセルに挿入したいのです。

1.あいうえお
  あいうえお
  あいうえお

そのままコピーしてエクセルに貼り付けたら
一つのセルには入らず3行分にまたがってはいりました。
セルの結合をするのかしら?と思って結合したら1行目の「1.あいうえお」が真ん中に残って
2,3行目の文字が消えてしまいました。

このような文章をこのままの状態で一つの列の一つの行(A列1行目など)に入れるには
どのようにすればできるのでしょうか?

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

A 回答 (5件)

セルをダブルクリックしてセルの中にカーソルがある状態でコピーを行えば問題ありません。



また、セル内で改行を行いたいのであれば「alt+ENTER」で行うことが出来ます。
    • good
    • 0
この回答へのお礼

ご回答ありがとうございます。

やってみました!できました!
セルをダブルクリックしないでそのまま選択して貼り付けていたのでできなかったのですね。
セル内の改行方法もわかりました。

助かりました!ありがとうございました!!

お礼日時:2005/04/07 20:31

まず 一つのセルに複数行入れるとき Alt + Enter で行を変えれますよ。

それと1行に入らないのが行の高さが原因なら高さを変更する方法もありです。(セル(列のAとか、行の1とかの部分)をダブルクリックすると自動で幅や高さを変えてくれます。)
    • good
    • 0
この回答へのお礼

ご回答ありがとうございます。

今回はメモ帳からのコピーペーストで一気にやる方法でやります。

直接入力のときはアドバイスどおりやります。

行の高さをダブルクリックでやると自動でできるんですね!
少しずつ動かして幅調整してました^^;

助かりました!ありがとうございました!!

お礼のポイントは皆さんに差し上げたいのですが
そうもいきませんので、回答の早かった方に差し上げたいと思います。
皆様ありがとうございました!!

お礼日時:2005/04/07 20:42

1.あいうえお[Alt+Enter][スペース]あいうえお[Alt+Enter][スペース]あいうえお


と入力してみてください。

[Alt+Enter]:AltとEnterを一緒に押してください。
    • good
    • 0
この回答へのお礼

ご回答ありがとうございます。

セルをただクリックするだけ泣く、ダブルクリックでカーソルがある状態でペーストすればできるとわかりました。
今回はメモ帳に入力したものをそのままペーストしたかったので一気にできる方法でやります。

エクセルに直接入力するときはアドバイスどおりにやります。

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

お礼日時:2005/04/07 20:38

メモ帳からコピーなら、



入れたいセルを選んでおいて、上のほうの数式バーをクリックしてそこにカーソルがある状態にしてからペーストすればいいと思います。

キーボード入力するなら、入力中に改行するには、altを押しながらEnterで改行されます。
    • good
    • 0
この回答へのお礼

ご回答ありがとうございます。

数式バーにペーストしてもできますね!
そのまま選択して貼り付けていたのでできなかったのですね。

助かりました!ありがとうございました!!

お礼日時:2005/04/07 20:35

すみません、上記の内容「コピー」ではなく「貼り付け」でした

    • good
    • 0
この回答へのお礼

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

お礼日時:2005/04/07 20:32

このQ&Aに関連する人気のQ&A

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

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

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

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

QExcel:複数のセルの内容を、ひとつのセルにすべて移したい。

たとえばA.B.Cのセルがあって、この内容をDのセルに
すべて移すにはどうしたらいいんでしょうか?

A.B.Cの内容をコピー貼り付けだと、
どうしてもDひとつだけでなく、その隣のセルに
内容をコピーしてしまいます。

Aベストアンサー

コピーしたいセルを選択してCtl+C

全部を貼り付けたいセルをダブルクリック

Ctl+Vではなく、オフィスクリップボードから貼り付け

Qexcelで1つのセルだけを分割する方法

excelで、行全体または列全体でなく、1つのセルだけを縦または横に分割する方法はありますか?

ご存知の方、是非お教えください。

Aベストアンサー

エクセルでセルは最小単位です、分割は出来ません。
むしろ逆に考えて、不要な行はセルを結合して1列的に見せてはどうでしょう。
見た目でやるなら(多分したいことを想像して)
桁合わせだけの問題なんですが。
(1)文字列のケースとする。数値や半角が混じると
うまくいかないかも。
(2)例えばD1セルに半角スペース10個を入れる。
(3)A列はフォントをPのつくものは避ける。
(4)例えばB列、c列に文字列データが入っているとする。
(5)A1セルに
=MIDB($D$1,1,10-LENB(B1))&B1&MIDB($D$1,1,10-LENB(C1))&C1
といれて下行に複写する。LENBをあえて使う。
(データ例)
    (A列)       (B列)  (C列)
大阪市 西園寺大阪市西園寺
長岡京市 熊山長岡京市熊山
津市 佐藤津市佐藤
(6)真中に縦に図形の直線を貼りつける。

Qエクセル:複数セルの情報を1つにまとめる方法

どなたか、どうかお力添えください。
図のように、列Aに並んだ別々のコードを、セルC4にあるように「;」でつなげて1つのセルに集約したいと思っています。
これまで、簡単な計算式を用いて、数式バーに
「=A3&";"&A4&";"&A5&";"&A6&";"&・・・・・」と打ち込んで、手作業で1つのセルにまとめていましたが、500件を超えるような集約をしようとすると、限界を感じています。

どなたか、「;」区切りでうまく集約する方法を御存じないでしょうか。
どうぞよろしくお願いいたします。

Aベストアンサー

C3セルに
=A3&";"&C4
と式を記入し,リストの下端までずらずらずらっとコピーしてください。
C3を改めてコピーし,形式を選んで値に貼り替えてしまえば,下の式は用済みなので削除します。
 削除する前に,一番リストの下端の式だけ「最後の;」を付けないように修正するか
または
 C3を値化したら,一番最後の;だけ削除してください。



#C3セルの式を
=A3&IF(C4="","",";")&C4
以下コピー
のように手間をかけても勿論構いませんが,これじゃどっちが楽かよくワカランとは思います。

Q貼り付けで複数セルに貼り付けたい

5行のテキストをコピペでエクセルに張り付けると。

1つのセルに5行分、改行なしで横に長く入力されてしまう。

希望は、
5行の場合A1セルからA5セルに入力させたいです。

ワードやメモ帳では元の行が再現されます。

数日前までは、できていましたが、
今日あたりからできません?
プログラムはいじっていません。

ひとつ思い当たるのが、ウィンドウズアップデートが最近あったからかも?

5行程度なら手動で分割でもいいですが、
20行にもなると、手動分割は手間です。

事の発端は、迷惑メールのメールヘッダーのコピーを
エクセルで保存したいのですが。
メールヘッダーは20行前後あるので。

Aベストアンサー

>貼り付け元はエクセルでないです。
>アウトルックのメールのヘッダー情報です。
分かっています。
別の方法でないと駄目のようです。
「貼り付けオプション」の「テキストファイル ウィザードを使用」で試してください。
区切り記号を無しにすれば改行で次のセルに跨るようです。

Qエクセルのセルの中で改行して入力したものを分割したいんです。

エクセルの入力編集について質問です。

セルに改行(Alt&Enter)をして下記のように入力を行ったのですが、

 Γ ̄ ̄Τ ̄ ̄ ̄ ̄¬
 |番号|内容1 |
 |  |内容2 |
 L__⊥____」

データ処理に不便なために同一セル内にある「内容1」と「内容2」を下記のように別々のセルにしたいと思います。

 Γ ̄ ̄Τ ̄ ̄ ̄ ̄¬
 |番号|内容1 |
 ―――――――――
 |  |内容2 |
 L__⊥____」

もしくは、
 Γ ̄ ̄Τ ̄ ̄ ̄ ̄¬
 |番号|内容1 |
 ―――――――――
 |番号|内容2 |
 L__⊥____」

手作業にてコピーアンドペーストと行の挿入を繰り返しを行うのは、非常に時間がかかるかと思います。

そこで、なにか一括で処理できる方法はありませんでしょうか?お願いします。
また、一括ではなくても入力が簡単になる方法はありませんか?

最後になりますが、Excel 2003を利用しています。

Aベストアンサー

    A      B
1  番号A  内容A
         内容B
2  番号B  内容C
         内容D
3  番号C  内容E
         内容F

のように並んでいる場合ですが、

1.A1:B3を選択してコピーし、Wordに形式選択(HTMLかリッチテキスト)で貼り付け。
2.Wordに貼り付けた全体を選択してコピーし、Excelの別シートに貼り付け。
3.番号の列が結合された状態なので、それらのセルをまとめて選択して結合解除。

ではいかがでしょうか。

QエクセルVBAで、複数セルのデータをひとつのセルに改行してまとめたいのですか・・・

データの内容をひとつのセルに改行して入れていくという
作業を自動化できないでしょうか?

「データ」シート
メモ 地点 from ~ to 線種
A1,B1,C1,D1,E1,F1に上の項目があり、
メモ、地点には文字、from ~ toには時刻(00:00)が入り、線種には
=====というような記号が入ります。("~"の列には00:00形式の時刻が入る他"~"という記号が入るときもあります)

それぞれの項目の下にデータを入力してあります。
これを「まとめ」シートに
・A~E列までをひとつのセルに改行してまとめる
・F列はその右隣にそのまま表記する

と自動でできないかと考えています。例えば、「データ」2行目に
A2 観劇
B2 日本大劇場
C2 10:00
D2 ~
E2 12:00
F2 ======
とある場合、「まとめ」シート
A2セルは
観劇
日本大劇場
10:00~12:00
と改行して入り、B2に「データ」F2の======が入るように「データ」シートのデータがなくなるまで右にずらっとつなげていくようにしたいと思っています。今手作業でやっているのですが時間がかかって・・・。
よろしくお願いします。

データの内容をひとつのセルに改行して入れていくという
作業を自動化できないでしょうか?

「データ」シート
メモ 地点 from ~ to 線種
A1,B1,C1,D1,E1,F1に上の項目があり、
メモ、地点には文字、from ~ toには時刻(00:00)が入り、線種には
=====というような記号が入ります。("~"の列には00:00形式の時刻が入る他"~"という記号が入るときもあります)

それぞれの項目の下にデータを入力してあります。
これを「まとめ」シートに
・A~E列までをひとつのセルに改行してまとめる
・F列はその右...続きを読む

Aベストアンサー

#1です。VBAの例
Sub MACRO1()
Dim RG As Range
Dim R1, R2 As Integer
Set RG = ActiveWindow.RangeSelection
R1 = RG.Row
R2 = R1 + RG.Rows.Count - 1
For I = R1 To R2
If Cells(I, 1) = "" Then Exit For
Cells(I, 1) = Cells(I, 1) & Chr(10) & Cells(I, 2) & Chr(10) & Format(Cells(I, 3), "hh:mm") & "~" & Format(Cells(I, 5), "hh:mm")
Range(Cells(I, 2), Cells(I, 5)) = Null
Next I
End Sub

Qエクセルで打ち込んだ数字を自動で別シートに表示したい

エクセルでセルに打ち込んだ数字を自動で別シートに表示できる方法があれば、教えてください。

例えば、シート1のC1に5を打ち込んだら、シート2のD2にシート1で打ち込んだ5が自動で表示される。

また1列すべてを自動で表示させる場合、一つのセルの時と違いがありましたら教えてください。よろしくお願いします。

Aベストアンサー

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コピー&リンク貼り付けを使うと便利です。

例)例)シート1のC1~C5に何かを入力したら、
  シート2のD2~D7にシート1で打ち込んだものが自動で表示される

  シート1にあるコピー元のセルを範囲選択して、
  シート2のD2の上で「右クリック」⇒「形式を選択して貼り付け」
  をクリックします。

  そして出てきた小さな画面の左下にある「リンク貼り付け」という
  ボタンをクリックすると完成です。
  試してみてください。。

  念のためにリンク貼り付けを図解しているURLを載せておきます。
  参考にしてみてくださいね。。
  http://www.geocities.jp/office_inoue/excel/eq21.htm

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コ...続きを読む

QExel VBA 別ブックから該当データを検索し、必要なデータを取得する方法について

部品表というブックがあります
A列に商品名、B列に商品番号が入力してあります。C列のコードは未入力です。
A列     B列     C列      
商品名  商品番号  コード
モータ  U-1325-L  
ホルダ  R-134256

また、コード一覧表という別のブックには、A列に商品番号と、B列にコードが、何千件も入力されています。

やりたいことは
部品表のC列のコード欄に、コード一覧表ブックから商品番号と一致するコードを貼り付けしたいのです。

部品表は、何百種類もありますので、関数ではなく、マクロで処理を希望します。

自分では、部品表の商品番号をコピーして、コード一覧表で検索し、検索結果の右隣のセル(B列のコード)の値を部品表のC列に貼り付ければよいかと思い、書いてみたんですが…

Sub 別ブックから貼り付ける()
  Dim 検索する As Long
Windows("部品表.xls").Activate
検索する = cells(i,2).Value
Windows("コード一覧表.xls").Activate
ActiveWindow.SmallScroll Down:=-3
Selection.AutoFilter Field:=3, Criteria1:="=検索する", Operator:= xlAnd

と、してみたものの、検索しても、その検索結果の隣のセルのコードをどうやって取得すればいいのかが、わかりませんでした。

基本事項は本で学びましたが、呪文のようなコードはよく理解できません。懸命にネットで検索して、訳して理解する努力をしてはいますが。

どうぞよろしくお願いします。

部品表というブックがあります
A列に商品名、B列に商品番号が入力してあります。C列のコードは未入力です。
A列     B列     C列      
商品名  商品番号  コード
モータ  U-1325-L  
ホルダ  R-134256

また、コード一覧表という別のブックには、A列に商品番号と、B列にコードが、何千件も入力されています。

やりたいことは
部品表のC列のコード欄に、コード一覧表ブックから商品番号と一致するコードを貼り付けしたいのです。

部品表は、何百種類もありますので、関数...続きを読む

Aベストアンサー

こんにちは。
とりあえず実用性も踏まえました。
メインの動作はワークシート関数のVLOOKUPをVBA上で使用していますので理解はしやすいかと思います。
また、質問文から察するに「部品表.xls」と「コード一覧表.xls」の両方を開いて処理されていますが「コード一覧表.xls」はプログラム内で開いて閉じているので実行するときは「コード一覧表.xls」は閉じて置いてください。
Option Explicit
Sub Sample()
 Application.ScreenUpdating = False
 Dim I As Long
 Dim xlBook
 Set xlBook = Workbooks.Open("C:\★★\コード一覧表.xls") '★要変更★
 I = 2
 Do While Range("A" & I).Value <> ""
  ThisWorkbook.Worksheets("Sheet1").Range("C" & I).Value = Application.VLookup(ThisWorkbook.Worksheets("Sheet1").Range("B" & I).Value, xlBook.Worksheets("Sheet1").Range("A2:B65535"), 2, 0)
  I = I + 1
 Loop
 xlBook.Close
 Application.ScreenUpdating = True
 MsgBox ("完了")
End Sub

こんにちは。
とりあえず実用性も踏まえました。
メインの動作はワークシート関数のVLOOKUPをVBA上で使用していますので理解はしやすいかと思います。
また、質問文から察するに「部品表.xls」と「コード一覧表.xls」の両方を開いて処理されていますが「コード一覧表.xls」はプログラム内で開いて閉じているので実行するときは「コード一覧表.xls」は閉じて置いてください。
Option Explicit
Sub Sample()
 Application.ScreenUpdating = False
 Dim I As Long
 Dim xlBook
 Set xlBook = Workbooks....続きを読む

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?

QExcelで2行を1行にまとめるには?

Excelで2行を1行にまとめる方法を教えてください。下の6行を2行にするには、どうしたらいいのでしょうか?
よろしくおねがいします。

Excel2003です。


A little knowledge is a dangerous thing.
(生兵法はけがのもと)
空白行
After a storm comes a calm.
(雨降って地固まる)
空白行


第1行:A little knowledge is a dangerous thing.(生兵法はけがのもと)
第2行:After a storm comes a calm.(雨降って地固まる)

Aベストアンサー

(データ)A1:A100
(1)A little knowledge is a dangerous thing.
(2)(生兵法はけがのもと)
(3)空白行
(4)After a storm comes a calm.
(5)(雨降って地固まる)
(6)空白行
(7)・・・・(略)
(8)・・・・
(9)・・・・
(関数式)E1に(B1でも良いが)
=INDEX($A$1:$A$100,(ROW()-1)*3+1,0)&INDEX($A$1:$A$100,(ROW()-1)*3+2,0)
E2以下最下行の1/3行まで複写する。
(結果)
(1)A little knowledge is a dangerous thing.(生兵法はけがのもと)
(2)After a storm comes a calm.(雨降って地固まる)
(3)以下略


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

人気Q&Aランキング