1つのセルの中に2行の文を入れることは可能でしょうか?どうしたらできるのですか?
 また、それができない場合、セル二つ分にたてに1行ずつ入れて、真中のセルの線を消すことはできますか?
 教えてください。

A 回答 (5件)

こんにちは



 セル内改行のショートカットキーは、 Alt+Enter です。

1.Ctrl+1 (メニュー[書式]-[セル])
2.[配置]タブ
3.[折り返して全体を表示する]にチェック

という方法もあります。

参考URL:http://www2.odn.ne.jp/excel/
    • good
    • 0

皆さんが回答している以外に、セルを結合すると言う方法もあります。


基本的にセルの書式設定のサブ画面で設定します。
結合したいセルを左クリックしてドラッグ→セル書式設定→配置タブ→文字制御のセルを結合するにチェックを入れる。→OKをクリックして結合完了
いろんな方法がありますので、皆さんの回答も参考にしながら、自分やり易い方法で試して下さい。
    • good
    • 0

ちなみに、セルの線を消すには、


その二つのセルをマウスで選択して右クリック→「セルの書式設定」→「罫線」タブで設定します。(Winの場合)
また、メニューバーに書式設定のボタンがあればクリック一発でできます。
    • good
    • 0

任意に行を分けたいのであれば、janmaさんのおっしゃるように、セルの編集中に"Alt+Enter"ですね。

    • good
    • 0

janmaさんの回答に補足します。



Excelは表計算ソフトです。を

Excelは
表計算ソフトです。

にするなら、Excelはを入力した後、Altキーを押しながらEnterキーを押してください。
    • good
    • 0

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

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

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

Qオフ車250ccで セルが回らない(泣) 

お世話になります。
ストレス発散に久々にバイクに乗ろうとしたら!
 
▼セルが回らない 
 ⇒バッテリーあがり?
▼業者に来て貰う 
 ⇒バッテリーつないでも(充電しても)かからないと言うより 
  セルがウンともすんとも言わない。

*冬の間は一度も乗らず
*先月、軽4につなげて 30kmほど走行
*ガソリン少なめ
*いつもは車は充電器につなげたら、一発でかかる
*今回は セルを押してもライトが押してる時に消えるだけで
セルの独特のティティティティ って音もしない
ウィンカー類は特に問題なし。

以上より。
キックはついておらず、私は押しがけはできません。
(昔はできたけど、女だし今の体力では厳しい・・・)

質問として
1.押しがけして エンジンがかかる可能性はあり?
 (ならば男友達に頼もうかと。)
2.バッテリーの問題?
 新品パッテリー購入すれば セルが回る可能性あり?
 (ならばとりあえずバッテリー購入)
3.セルの接触不良の問題?
 (素人でも調べる方法はアリ?セルモータをたたけば一時的に
  かかるとも聞いたことがあるが セルモータはどこにある?)

アドバイスお願いします。
ちなみにバイクは SUZUKI DR250R 98年式
バッテリーは毎年買いなおしています・・・
もともと電気系統のウィークポイントが多く なんと2000年式から
ノーマルでキックスタータがついたと言うバイクです。


 

お世話になります。
ストレス発散に久々にバイクに乗ろうとしたら!
 
▼セルが回らない 
 ⇒バッテリーあがり?
▼業者に来て貰う 
 ⇒バッテリーつないでも(充電しても)かからないと言うより 
  セルがウンともすんとも言わない。

*冬の間は一度も乗らず
*先月、軽4につなげて 30kmほど走行
*ガソリン少なめ
*いつもは車は充電器につなげたら、一発でかかる
*今回は セルを押してもライトが押してる時に消えるだけで
セルの独特のティティティティ って音もしない
ウィンカー類は特...続きを読む

Aベストアンサー

こん**は

 まずはバッテリーですね
 フル充電するか、新品に交換してください。
 次はスタータースイッチを点検してください。
 分解して中が汚れていないか確認です。
 汚れいればパーツクリーナなどで洗浄してください。
 バッテリーとスイッチが正常ならスターターリレーですね
 スイッチを押して「かちっ!」と言うならとりあえずは正常です。
 言わないのならリレー交換です
 リレーが正常なら、次はモーターです。
 モーターはエンジンから外して回るかどうか確認しましょう。
 モーターが回ればエンジン内(クラッチ周り)の故障
 モーターが回らなければモーター交換となります。

 確実にチェック出来る計測機器を用意してください
 工具、テスター等が無いのなら、詳しい友人に頼むのが良いでしょう
 どれもないのなら素直にバイク屋に行かれるのをお勧めします

Qエクセルのセル。行を見間違えないよう、1行ずつ色を変えたい

エクセル初心者です。何度もお世話になり恐縮です。

エクセルのシートの項目が多いため、表がすごく横長になり、左右にスクロールして見なければなりません。
うっかりすると、途中で行がわからなくなります。

そこで、1行ごとに色を変えたいと思います。
できれば3色ぐらいにして、
   白→水色→グレー→白→水色→グレー
とやっていきたいのですが。。。

条件付き書式でできるでしょうか?
よろしくお願いいたします。

Aベストアンサー

こんにちは。maruru01です。

範囲選択して、メニューの[書式]→[条件付き書式]で、

(条件1)
「数式が」
「=MOD(ROW(),3)=2」
[書式]の[パターン]:「水色」

追加して、
(条件2)
「数式が」
「=MOD(ROW(),3)=0」
[書式]の[パターン]:「グレー」

と設定します。

Qセルが回らない

ybr125に乗っているのですが、セルが回らないため始動できません。

セルスイッチを押すと「カチっ」と音を立てるだけです。
夏頃から回りづらいと思ってはいたのですが、冬になると完璧に回らなくなりました。

最初はバッテリーを疑って2~3年物のバッテリーを新品に交換
現在、電圧はテスターで測ったところ12~13Vあります。

セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。
押しがけではかかります。

今日はスターターリレーを交換してみましたが変わりませんでした。
ヒューズも交換済みです。

どこら辺が怪しいと思いますか?
キャブまで分解清掃したほうがいいでしょうか?

Aベストアンサー

>セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。

↑この意味が理解出来ませんか?

車のバッテリーからブースターケーブル繋いで回るなら「バイクのバッテリーが弱ってる」のです。

バッテリーの電圧をテスターなどで測る場合は電流負荷を掛けないと弱っていても12Vから13Vの電圧は出ますから「セルモーターを回した時の電圧」を測ってください。

恐らく、8V以下の電圧に下がってしまうはずです。

だから、セルを回すだけのパワー(電流)がバッテリーから供給されずに回らないのです。

バッテリーを新品に換えても「バッテリーに充電されなければ直ぐに容量不足」になってしまいますから、充電系統が故障してる疑いもありますから、エンジン始動後にヘッドライトやウインカーを点けてエンジン回転数を上げたり下げたりして明るさが大きく変化するか確認してください。

また、その時のバッテリー電圧を測ってください。

エンジン回転数に応じてバッテリー電圧が変動するはずですが、バッテリーが正常に充電されて満充電状態になれば電圧変動は少なくなります。

結論は、バイクのバッテリーが充電不足で弱ってるからなので、充電器で充電するか長距離を走行してバイクの発電機で自力充電を行ってください。

バッテリーが元気に回復すれば、車からブースターケーブルを繋がなくてもセルが回るようになります。

>セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。

↑この意味が理解出来ませんか?

車のバッテリーからブースターケーブル繋いで回るなら「バイクのバッテリーが弱ってる」のです。

バッテリーの電圧をテスターなどで測る場合は電流負荷を掛けないと弱っていても12Vから13Vの電圧は出ますから「セルモーターを回した時の電圧」を測ってください。

恐らく、8V以下の電圧に下がってしまうはずです。

だから、セルを回すだけのパワー(電流)がバッテリーから供給されずに回...続きを読む

QExcl2000で、複数のセルを一括消去しようとしても、1セルずつしかできなくなりました

複数のセルの内容を、一括して消去したい時は
1.空白にしたい複数のセルを選ぶ
2.Back Space又は、Deleteを押す
ですよね。
それができなくなってしまい、1セルずつ消してます。
今日使ったのは、セルの移動する方向を「下」から「右」にかえた、くらいで、特に問題のあることはしていないような気がしますが、不審なこともありました。
「シート」の表示と、印刷プレビューの表示内容が合わなくなり、シートの中でコピーや削除を繰り返したり、シートをコピーしたり、しましたが、結局新しく作り直しました。
その後いったんPCの電源を切って、もう一度立ち上げて消去できるか確認しましたがだめでした。

Aベストアンサー

そうなる原因は分かりませんが、まず「アプリケーションの自動修復」を試してください。

メニューバーの「ヘルプ」→「アプリケーションの自動修復」をクリックします。

自動修復で直らなければ、Officeの修復または、削除して再インストールすれば直る可能性が高いです。

1) 「スタート」→「コントロールパネル」→「設定」→「プログラムの追加と削除」

2) Office 2000をクリックして、「変更」を押して、「修復」をクリックすれば修復してくれます。

修復の途中、「CD-ROMを入れてください。」というメッセージがでる可能性がありますので、手元に用意しておいてください。

削除~再インストールする場合は、2)で、「削除」を押してください。

うまく修復されることを祈ります。

Qライトはつくのに、セルが回らない!!

お世話になります。

先日、HIDの片方が点灯しなくなった為、新しい商品を購入、今日取り替えました。
けっこう時間はかかったものの、なんとか無事に終わりまして、車を車庫から移動させました。

その後、2時間くらい経ってから、車に乗ってエンジンをかけようとしたら、セルが全く回らなくなってしまいました。

ヘッドライトも付きますし、ルームランプもナビも正常に動きます。

とりあえず、アクセサリ→オンまではいつも通りですし、カチカチと言う音もします。
しかし、そこからどんなに回しても、ウンともスンとも。。。

違う車で何度かバッテリーを上げた事もありますが、、セルが回らないと言ってもキュルキュルぐらいは音が鳴って、エンジンがかからないと言った症状ではあったのですが、今回は本当に何の音も鳴りませんし、何の反応もありません(汗

HID(バルブではなくキットごと)を交換した際に、バッテリーを外しましたので、締め方が緩かっただろうか?と思ったのですが、そうでもないようです。

試しに、他の車のバッテリーとケーブルで繋いでセルを回してみましたが、同じ結果でした。。。(泣

これは何が原因と考えられるでしょうか?
ライトやナビ自体は正常に付くので、バッテリーではないと言うことでしょうか?
セルモーターですか?
今まで不具合らしい不具合は無かったのですが、それともやはりHID交換時に何かしてしまったのでしょうか。。。

車屋にも連絡して見ましたが、今日明日はどうしてもレッカーを使えないそうで。。。

どなたか、詳しい方がおられましたら、どうか想像の出来る範囲でも構いませんのでお知恵をお貸し頂きたく思います。
助けてください(泣
よろしくお願い致します!!

お世話になります。

先日、HIDの片方が点灯しなくなった為、新しい商品を購入、今日取り替えました。
けっこう時間はかかったものの、なんとか無事に終わりまして、車を車庫から移動させました。

その後、2時間くらい経ってから、車に乗ってエンジンをかけようとしたら、セルが全く回らなくなってしまいました。

ヘッドライトも付きますし、ルームランプもナビも正常に動きます。

とりあえず、アクセサリ→オンまではいつも通りですし、カチカチと言う音もします。
しかし、そこからどんなに回しても、ウン...続きを読む

Aベストアンサー

>カチカチ
どういう状況での音?、(1)キーをひねった時、(2)セル始動しようとした時、(3)その他。
真っ先に、セルモーターに十分な電気が行っていない(確実な状況)。
何故?、バッテリーに十分な電力がない(セルはライトの十倍以上必要と思うべし)(2)の時。
バッテリーOKだが(2)、バッテリ、セル直結する(ソレノイドスイッチ接触不良)ただし(1)の時で(2)で音がしない時はソレノイドスイッチの駆動回路に問題。
セルモーターの異常。
電気系をいじった後であり、2時間後の状況から、配線ミスでショートの可能性も否定できません。

Qセル内で改行された文字列を1行ずつ他のセルに移す

excelで、こんなことできますか?
book1で、セル内に下のような改行した文字列があり、それを入力したら、
book2に、文字列を1行ずつ他のセルに取り出したいのですが…できますか?

book1 (セルは折り返して全体を表示する) book2 (仕上げの画面)
A         A
あいうえお                    1 あいうえお
1 かきくけこ                    2 かきくけこ
さしすせそ                    3 さしすせそ
→ 4 たちつてと
2 たちつてと                    5 なにぬねの
なにぬねの                     6 はひふえほ

3 はひふへほ

教えていただけると助かります。(ただしマクロはよくわからないのですが…)

excelで、こんなことできますか?
book1で、セル内に下のような改行した文字列があり、それを入力したら、
book2に、文字列を1行ずつ他のセルに取り出したいのですが…できますか?

book1 (セルは折り返して全体を表示する) book2 (仕上げの画面)
A         A
あいうえお                    1 あいうえお
1 かきくけこ                    2 かきくけこ
さしすせそ...続きを読む

Aベストアンサー

シート1のA1セルに入力された文字が有るとしたらシート2のA1セルには次の式を入力して下方にドラッグコピーします。

=TRIM(MID(SUBSTITUTE(Sheet1!$A$1,CHAR(10),REPT(" ",100)),(ROW(A1)-1)*100+1,50))

横方向の列に表示させるとしたらシート2のA1セルには次の式を入力して右横方向にドラッグコピーします。

=TRIM(MID(SUBSTITUTE(Sheet1!$A1,CHAR(10),REPT(" ",100)),(COLUMN(A1)-1)*100+1,50))

その場合にはシート1のA列に同様の文字の入力が複数行あった場合でも、式を下方にもドラッグコピーすることで良いでしょう。

Qセルが回らない CDIの故障はあり得ますか?

こんばんば。
ネットで買ったバイクのレストアをしている者です。(レストア初心者です。)
セルスイッチを押してもモーターが回りません。
※良くある、セルスイッチを押してもカチッと音がするだけでセルが回らないってヤツではありません。
セルスイッチを押してもうんともすんとも言いません。
いろいろ配線をチェックしたのですが、原因が分かりません。
そこで下記のサイトを見ましたところ、ジャンクションボックス内にもスターターリレーのスイッチがあるという事を知りました。
http://motor.geocities.jp/cfsxd043/kawasaki/kawa1.html
(1)このジャンクションボックス内のスターターリレーの部分が壊れてセルが回らないって事はあり得ますか?

それと、スターターリレー直結すると、セルモーターが回り、エンジン始動します。

また、スターターリレーが故障しているかチェックする方法を教えてください。

よろしくお願いします。

Aベストアンサー

>スターターリレー直結すると

この意味が曖昧なので断定できないですし
車種が不明ですが、リレーは大体ヒューズ(15~30A)と
一体になってバッテリー近辺にあるスイッチです。
http://www.geocities.co.jp/MotorCity-Circuit/2519/electrics/relay.html

キル、セルボタン等の接触不良があるとリレーに
12V来ないのでリレーが動作しません。
セルスイッチ等の接触やアースが正常でボタン押すか
バッテリー直でリレーの+側に12V送りリレーが動作しない
カチってならないならリレーの故障です。
リレー自体は、9~10Vあれば動作する部品で
長期放置だと固着したり壊れる場合があります。

その他で多いのは、ターミナルの接触不良
バッテリーのマイナス端子からボディやシリンダーに
いく配線の腐食や接触不良などもあります。
キーONで電装やランプが点灯しても、接触が
不十分だと大電流を必要とするためセルモーターは回らない
リレーがカカカカってしか動作しない例も
ありました。

中には特殊な車種、構造のものもあるので
本気でレストアするなら車種くらいは提示するか
サービスマニュアル購入たほうがいいですよ。
そこにリレー以外の電装のチェック方法や始動不能の場合の
フローチャート、配線図も詳しく書いてあるので。
http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1248608007

>スターターリレー直結すると

この意味が曖昧なので断定できないですし
車種が不明ですが、リレーは大体ヒューズ(15~30A)と
一体になってバッテリー近辺にあるスイッチです。
http://www.geocities.co.jp/MotorCity-Circuit/2519/electrics/relay.html

キル、セルボタン等の接触不良があるとリレーに
12V来ないのでリレーが動作しません。
セルスイッチ等の接触やアースが正常でボタン押すか
バッテリー直でリレーの+側に12V送りリレーが動作しない
カチってならないならリレーの故障です。
リレー自体は、9...続きを読む

QVBA 他ブックのセルの値を1セルずつ代入したい

昨日↓でお世話になりました。
http://oshiete1.goo.ne.jp/qa4299999.html

おかげさまでだいぶ先に進むことができました。
ですがまた行き詰ってしまったので、お力を借りれたらと思い質問させていただきます。

昨日ご教授いただいたコードでは、「管理表.xls」のコマンドボタンを押すと、同一フォルダ内にあるブック「*予定表*.xls」内のシート「*予定?」の固定の範囲
「G2,H2,N3,O3」を「管理表.xls、sheet2、A1:D4」に
「B14:I44」を「管理表.xls、sheet2、A2:H32」に
まだファイル、シートがある場合はループでそれらの次の行に値をいれていくことができたのですが、固定範囲のうちの「G2,H2,N3,O3」を、「管理表.xls、sheet2、A2:H32」のA~D列全てに付けたいのです。
なんかわかりづらい表現になってしまいましたが、

____A___B___C___D____E____F____G____H____I____J_____K____L
1 G2 G2 N2 O3 B14 C14 D14 E14 F14 G14 H14 I14
2 G2 G2 N2 O3 B15 C15 D15 E15 F15 G15 H15 I15
3 G2 G2 N2 O3 B16 C16 D16 E16 F16 G16 H16 I16
            ・
            ・
            ・



という感じにしたいんです。どうかご教授お願いします。
一応コードを載せておきます。

Sub 予定()

Dim Pn As String
Dim Fn As String
Dim ws As Worksheet
Dim r As Range
Dim v, i As Integer

Pn = ActiveWorkbook.Path
ChDir Pn

Fn = Dir("*予定表*.xls")

v = Array("N3", "O3", "G2", "H2")

Set r = ThisWorkbook.Worksheets("Sheet2").Range("A1")


Do Until Fn = ""

Workbooks.Open Filename:=Fn

For Each ws In Worksheets


If ws.Name Like "*予定?" Then
With ws
For i = 0 To 3
r.Offset(0, i).Value = .Range(v(i)).Value

Next

r.Offset(1).Resize(31, 8).Value = .Range("B14:I44").Value
Set r = r.End(xlDown).Offset(1)


End With

End If

Next


Workbooks(Fn).Close SaveChanges:=False

Fn = Dir()

Loop

End Sub

++++++++++++++++++++
OS ⇒Windows XP
Version⇒Excel 2000
++++++++++++++++++++

昨日↓でお世話になりました。
http://oshiete1.goo.ne.jp/qa4299999.html

おかげさまでだいぶ先に進むことができました。
ですがまた行き詰ってしまったので、お力を借りれたらと思い質問させていただきます。

昨日ご教授いただいたコードでは、「管理表.xls」のコマンドボタンを押すと、同一フォルダ内にあるブック「*予定表*.xls」内のシート「*予定?」の固定の範囲
「G2,H2,N3,O3」を「管理表.xls、sheet2、A1:D4」に
「B14:I44」を「管理表.xls、sheet2、A2:H32」に
まだファイル、シートがある場...続きを読む

Aベストアンサー

>上かつ、N2、O3は文字列なのでstringにしたいんです。

サンプルです。

Sub test2()
 Dim ws As Worksheet
 Dim r As Range
 Dim v, i As Integer

 v = Array("N3", "G2")

 Set r = Worksheets("Sheet2").Range("A1")       '貼り付けるのは1行目から?
 Worksheets("Sheet2").Range("A:B").NumberFormatLocal = "@"  '文字列設定

 For Each ws In Worksheets
     If ws.Name Like "*予定?" Then
        With ws
             For i = 0 To 1
                 r.Offset(, i * 2).Resize(31, 2).Value = .Range(v(i), .Range(v(i)).Offset(, 1)).Value
             Next
             r.Offset(, 4).Resize(31, 8).Value = .Range("B14:I44").Value
             Set r = r.End(xlDown).Offset(1)
        End With
     End If
 Next
 Set r = Nothing
End Sub

>上かつ、N2、O3は文字列なのでstringにしたいんです。

サンプルです。

Sub test2()
 Dim ws As Worksheet
 Dim r As Range
 Dim v, i As Integer

 v = Array("N3", "G2")

 Set r = Worksheets("Sheet2").Range("A1")       '貼り付けるのは1行目から?
 Worksheets("Sheet2").Range("A:B").NumberFormatLocal = "@"  '文字列設定

 For Each ws In Worksheets
     If ws.Name Like "*予定?" Then
        With ws
      ...続きを読む

Qセルが回らない(T^T)

バリオスなのですが、バッテリーは、充電をし完璧な状態なのにセルが、回らない セルスイッチを押しても 「カチッ!!」と言う音しかしません。これは、セルが悪いのでしょうか?

Aベストアンサー

下記のURLに同じような症状のバイクがありました。
No.9に私が回答していますが、このときの質問者は
これで直ったようです。
一度、ご確認下さい。

参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?q=1412669

Q空白セルを含む最終行変動データ行列で、特定の二つの列の空白セルのみに○を入力するマクロコードを教えて

空白セルを含む最終行変動データ行列で、特定の二つの列の空白セルのみに○を入力するマクロコードを教えて下さい。

Aベストアンサー

こんばんは!

>特定の二つの列・・・
とは具体的にどの列か判らないので、A・B列としてみました。

空白セルとは数式などによって空白に見えるセルではなく、何もデータがないセルだとします。

Sub Sample1()
Dim j As Long, lastRow As Long
For j = 1 To 2
lastRow = WorksheetFunction.Max(lastRow, Cells(Rows.Count, j).End(xlUp).Row)
Next j
If lastRow > 1 Then
On Error Resume Next '//←念のため//
Range(Cells(1, "A"), Cells(lastRow, "B")).SpecialCells(xlCellTypeBlanks).Value = "○"
End If
End Sub

こんな感じではどうでしょうか?m(_ _)m

こんばんは!

>特定の二つの列・・・
とは具体的にどの列か判らないので、A・B列としてみました。

空白セルとは数式などによって空白に見えるセルではなく、何もデータがないセルだとします。

Sub Sample1()
Dim j As Long, lastRow As Long
For j = 1 To 2
lastRow = WorksheetFunction.Max(lastRow, Cells(Rows.Count, j).End(xlUp).Row)
Next j
If lastRow > 1 Then
On Error Resume Next '//←念のため//
Range(Cells(1, ...続きを読む


このカテゴリの人気Q&Aランキング

おすすめ情報