一覧表を作るとき、セル内の文字数(約100字程度)がばらばらなので、行の高さを自動的に調製して、文章をセル内に入れる方法はないのでしょうか?(行の高さはばらばらでもよいです。)よろしくお願いします。

A 回答 (2件)

マクロ以外の方法なら・・・入力後になるのですが、


シートの左上(1の上でとAの左側)隅をクリックするとシート全体が選択されます。この状態で行間(どこでもよい・・例えば2行と3行の間の線)をWクリックすると行の高さは自動調整されます。
その時に100文字が1つのセルですとセルが横に長くなり見にくい場合は、ツールバーから「書式」→「セル」→「配置タブ」で折り返して表示のチェックボックスをONにしておきます。
    • good
    • 0
この回答へのお礼

ありがとうございました。作業時間がととても短くなりました。

お礼日時:2001/01/19 09:56

1.該当するセルをクリックもしくは、範囲選択する。


2.セルの書式設定/配置のタグで折り返して全体を表示する にチェックを入れてください。
3.メニューの書式/行/自動調整 をする。

これで、セル内に文字は表示されるはずです。ただし、セル幅が狭いと何行にもなってしまうので、あらかじめセル幅を整えておく必要があります。
また、セル内で改行を任意の場所で行いたい時は、Alt+Enter です。
    • good
    • 0
この回答へのお礼

ありがとうございました。作業が大変楽になりました。

お礼日時:2001/01/19 09:53

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

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

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

Q雨降ると気温って下がるんでしょうか?

雨降るとその日の前後より気温が下がる傾向にあると思うんですが雨降るとやはり気温は下がるものなんでしょうか?

昨日も(東京)けっこう暑かったのに雨降った途端少し涼しくなったので気になりました。

Aベストアンサー

  こんばんは。

 確かに雨が降ると気温は下がります。

 それと、気温が高くて地面、都内でしたらアスファルトが熱せられて表面が熱くなっていますが、雨水で冷やされるのと、打ち水の原理で水が気化するときに周囲の熱を奪うので気温が下がって涼しくなるといういくつかの理由が重なって、涼しくなるということです。

 真夏の夕立ちの後はとても涼しくなるというのもその理由です。

Qセルの高さを「指定したセルの高さ×セル内の行数」に自動で修正する方法について

エクセル2010を使っている者ですが、セルの高さの設定のことで伺います。

「ホーム」タブ→「セル」のリボン→書式で、セルの高さを指定することができますが、そこで指定すると、1行で入力されたセルのみでなくセル内で行の折り返しがあって複数行になっているセルについても、指定したとおりの高さになってしまいます。(例えば、高さを14にすると、1行で入力されたセルのみでなく2行で入力されたセルについても高さが14になってしまい、入力した値が表示されなくなってしまう)

セルの高さを指定しつつ、複数行になったセルについては「指定したセルの高さ×セル内の行数(正確には、そのセルの所属する行中の最大行になったセルの行数)」に自動で修正されるようにする方法はありますか?

Aベストアンサー

こんにちは。

おそらくは、マクロでよろしいかとは思いますが、「自動で修正される」というように設定してしまうと、私なら、うっとうしく感じますが、こういう感覚は、人それぞれですから言明はしません。

実際に、私が使う目的でマクロを考えてみました。

「個人用マクロブック(PERSONAL.XLSB)」
「標準モジュール」にマクロを置き、
「クイックアクセスツールバー」に登録。
(私は、ショートカットにはしません。たぶん、忘れてしまうからです)

なぜ、「個人用マクロブック」に登録するかというと、2点の利点があります。

ひとつは、保存する拡張子の影響がない(xlsx/xlsm)。もう一つは、クイックアクセスツールとして、いつでも使える。

なお、十分に納得のいかない内容でしたら、以下のマクロは個人用マクロブックにはいれるべきではありません。
今回は、特別に、マクロに内容説明を入れましたので、それを読めば、何をしようとしているか分かるはずです。
ふつうは、このような解説を入れませんから、納得がいけば解説部分は消してよいです。

'//
Sub Lines_CellHeight()  'この名前は、臨時ですから、適当に変えてください。(日本語名可)
'No. 9043589
 Dim c As Range
 Dim i As Long
 Dim h As Double
 Dim stdHt As Double
 Dim ht As Double
 If TypeName(Selection) <> "Range" Then  'マウスで選択した場所が、セルの範囲でないなら、
  MsgBox "該当範囲を選択してください。", vbExclamation  'メッセージを出して、
  Exit Sub  'マクロは終わる
 End If
 stdHt = ActiveSheet.StandardHeight  '標準のセルの高さ
 For Each c In Selection  '選択範囲からひとつのセルを検討する
  If c.HasFormula = False And Not IsEmpty(c) Then  'セルは数式がないことと、空ではないなら、
   i = Len(c.Value) - Len(Replace(c.Value, vbLf, ""))  'セル内の改行コードの数
   If i > 0 Then  '一つでもあれば、
    ht = c.Rows.RowHeight  'セルの行の高さ
    If stdHt * (i + 1) > ht Then  'セルの高さよりも、標準のセルの高さ✕(改行コード数+1)が高ければ、
     c.FormatConditions.WrapText = False  '書式の折り返して全体を表示する、Offにし
     c.EntireRow.RowHeight = ht * (i + 1)  'セルの高さ✕(改行コード数+1) の高さにする
    End If
   End If
  End If
 Next c
End Sub

こんにちは。

おそらくは、マクロでよろしいかとは思いますが、「自動で修正される」というように設定してしまうと、私なら、うっとうしく感じますが、こういう感覚は、人それぞれですから言明はしません。

実際に、私が使う目的でマクロを考えてみました。

「個人用マクロブック(PERSONAL.XLSB)」
「標準モジュール」にマクロを置き、
「クイックアクセスツールバー」に登録。
(私は、ショートカットにはしません。たぶん、忘れてしまうからです)

なぜ、「個人用マクロブック」に登録するかというと、2点の...続きを読む

Q雪が降らないと気温が下がる??

東北に住んでます。
夜中に除雪の仕事をしていていつも思うのですが、
雪がまったく降らない夜はいつもより温度が下がって寒くなります。
通常が、-2~4なのに対し、まったく降らないときは-7~10です。

雪が降らないと気温が下がるのでしょうか?それとも気温がかなり下がると雪が降らないんでしょうか?
どっちなのでしょう。
詳しく説明できるかた、おねがいします。

Aベストアンサー

雪雲が頭上に無い晴れた状態では、放射冷却で気温が下がります。

逆に雲がかかった状態では放射冷却は起き難いので気温低下にはつながりません。

その関係ではないでしょうか?

つまり・・・↓↓↓

雪が降らない=晴れて放射冷却が起きる=気温低下。

雪が降る=雪雲で覆われている=放射冷却が起きない=暖かい。

参考まで。

QEXCEL2002でセル内で改行(Alt+Enter)した時に、行の高さを変えない方法

初めて質問させていただきます。どうぞよろしくお願いいたします。

EXCEL2002でセル内で改行(Alt+Enter)をすると、自動的にそのセルのある行の高さが変わってしまいます。
その時セルの書式を見ると「配置」タブ内の「折り返して全体を表示する」に勝手にチェックが入ってしまっているので、このチェックをはずすと、行の高さも元に戻るのですが、いちいちするのに手間がかかっています。

行の高さが勝手に変わらないようにする方法というのはあるのでしょうか。

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

Aベストアンサー

「書式」「行」「高さ」で高さを設定して「OK」すれば変わりません。
変わるのは「高さ」が「自動調整」になっているためです。

Q太陽表面より温度が低い黒点が減ると、地球の気温が下がるのはなぜ?

太陽黒点がゼロになったというニュースを見ました。
太陽表面(6000K)よりも温度が低い太陽黒点(4000K)が減ると、
地球の気温が下がるのはなぜなのでしょうか?
直感的には逆で、黒点が減ると太陽表面温度が上がり
地球の気温も上がるように思うのですが・・・

Aベストアンサー

 衛星による観測結果として、黒点が多い時期の方が少ない時期と比べて、平均として太陽が明るいことがわかっています。太陽からの可視域での(以下、同じ)放射エネルギーの変動は、均してみれば0.2%程度です。

 大きな黒点が出れば、太陽の明るさは0.2%程度暗くなりますが、これはいわば"瞬間値"です。長い目で見れば、黒点が多い活動期には白斑も多く出ており、ここからのエネルギー放射が黒点によって抑えられる放射より大きく、このために黒点が多い時期の方が明るいのだろう、というのが現在の解釈です。

 さて、地球が楕円軌道を描いて太陽の周りを回っていることはご存知のことと思います。楕円であることにより、地球に届く太陽からの放射エネルギーはどれくらい変動するのでしょうか? 太陽3個分ほどの距離の変動がある、つまり3%ほど太陽-地球間の距離が変わりますから、放射エネルギーの変動は(太陽を中心とする球面の面積で効いてくるので)、ラフな計算で6%となります。太陽放射エネルギーの0.2%の変動はこれに比べたら話になりません。季節変動の方が、遙かに大きいのです。

 黒点が減ると地球の気温が下がる?・・・って、黒点が"少ない"期間としていったいどれくらいの年月を想定しての話なのでしょうか?

 ということで、数十年というようなよほど長い期間黒点が無かったりしない限り、地球の気温と黒点数との関係はあるかないかまったくわかっていないというのが実情です。

 ただし、紫外線やX線の放射量はかなり大きく変化しますから、このことによる変動はあるかもしれません。あくまでも"かもしれない"というだけで、黒点数と気候変動の関係はまだ解明されていないという理解が最も望ましい理解の仕方だと思います。

 衛星による観測結果として、黒点が多い時期の方が少ない時期と比べて、平均として太陽が明るいことがわかっています。太陽からの可視域での(以下、同じ)放射エネルギーの変動は、均してみれば0.2%程度です。

 大きな黒点が出れば、太陽の明るさは0.2%程度暗くなりますが、これはいわば"瞬間値"です。長い目で見れば、黒点が多い活動期には白斑も多く出ており、ここからのエネルギー放射が黒点によって抑えられる放射より大きく、このために黒点が多い時期の方が明るいのだろう、というのが現在の解釈で...続きを読む

Qセル内に2行の文章をいれる

Excelセル内に文章を2行入れる方法。

Aベストアンサー

こんにちは。
1行入力して、ALT+ENTERを入れてみてください。

Q気温が下がる頃から目が痛む

最近、パソコンの画面を見ていると、午後ぐらいから目が痛み出します。
午前中は感じません。
夏場は、目の痛みは全くないです。
秋の気温が下がる頃からです。
ドライアイの季節でもないと思います。

気温と目の痛みは関連があるのでしょうか?
また対処法を教えて下さい。

Aベストアンサー

お邪魔させていただきます。
考えられる病気
<ドライアイ>
目の乾燥によって涙が不足してしまい、角膜に傷をつけてしまいます。異物感やゴロつきなどの痛みが生じます。
ドライアイになる最初の原因は眼球表面の涙液の量が減ることですが、それには涙液の分泌の低下と、涙液の蒸発が多くなることの二つが影響しています。その背景として、次のような要因があげられます。
空気が乾燥していると、目の表面から涙液が蒸発しやすくなります。このためドライアイの人の多くは、秋から冬にかけての季節の変わりめに症状が強くなります。
本来は湿度が高い夏場も、エアコンの利いた部屋にいると目が乾きます。
<眼精疲労>
眼の奥に重い痛みを感じる事があります。疲れの原因は様々ですが、眼精疲労を訴える人の半分以上にドライアイの症状が併発していることがわかっています。
<緑内障>
眼球内の圧力(眼圧)が上がり視神経が侵され、視力低下や視野狭窄をおこします。急に眼圧が上がる急性の緑内障発作では眼の痛みに加え頭痛・吐き気などもあり、短時間で失明に繋がる可能性もある、早急な治療が必要な病気なのです。
緑内障は眼圧が高くことなることで視神経が圧迫され、それによって視野が狭くなるなど障害が起きる病気です。
眼圧は座っている時と寝ている時でも変化があるなど変動が多いのですが、季節によっても変化があります。特に冬には眼圧が上がる傾向にあり、注意が必要です。その理由は、眼圧の調整には自律神経が関与しているからだと言われています。気温が下がると体温を上げようと、自律神経の中の交感神経系が活発になり、興奮状態になり眼圧が上がるのではないかと考えられています。

対処法は
まず眼科に受診。適切な指導を受け治療(目薬の点眼)じゃないですか。
もし、緑内障だったら、失明する可能性もありますから。

お邪魔させていただきます。
考えられる病気
<ドライアイ>
目の乾燥によって涙が不足してしまい、角膜に傷をつけてしまいます。異物感やゴロつきなどの痛みが生じます。
ドライアイになる最初の原因は眼球表面の涙液の量が減ることですが、それには涙液の分泌の低下と、涙液の蒸発が多くなることの二つが影響しています。その背景として、次のような要因があげられます。
空気が乾燥していると、目の表面から涙液が蒸発しやすくなります。このためドライアイの人の多くは、秋から冬にかけての季節の変わりめに症...続きを読む

Qセル内の2行をそれぞれ別のセルにコピーするマクロ

A列にデータが入力されていたとします。
そのデータのうち、複数のセルで改行されて2行になっています。
改行されているセルをサーチし、1行目をB列のセルに、2行目をC列のセルに分割してコピーしたいと思います。

この様な方法は、マクロで可能でしょうか。
適切な関数があれば、ご教授いただきたいと思います。

Aベストアンサー

以下のマクロをVBE画面の標準モジュールにペーストしてください

Sub Macro3()
Dim idxR As Long, resF
Application.ScreenUpdating = False
For idxR = 1 To Range("a65536").End(xlUp).Row
With Cells(idxR, 1)
resF = Application.Find(Chr(10), .Value)
If IsNumeric(resF) Then
.Copy
.Offset(0, 1).Select
ActiveSheet.Paste
End If
End With
Next idxR
Range(Cells(1, 2), Cells(idxR, 2)).TextToColumns _
DataType:=xlDelimited, Other:=True, OtherChar:=Chr(10)
Application.ScreenUpdating = True
End Sub

以下のマクロをVBE画面の標準モジュールにペーストしてください

Sub Macro3()
Dim idxR As Long, resF
Application.ScreenUpdating = False
For idxR = 1 To Range("a65536").End(xlUp).Row
With Cells(idxR, 1)
resF = Application.Find(Chr(10), .Value)
If IsNumeric(resF) Then
.Copy
.Offset(0, 1).Select
ActiveSheet.Paste
End If
End With
Next idxR
Range(Cells(1, 2), Cells(idxR, 2)).TextToColumns _
DataType:=x...続きを読む

Qなぜ標高が高いほど気温が下がるの?

 大気圏外、例えば宇宙空間や月世界では日向の温度は凄く高いと聞きました。

 では大気圏内では何故、標高が高くなるにつれて気温が下がるのでしょうか

 単純に考えると太陽に近づくから暖かくなるって思うのですが、、

 『人生半ばにして、馬鹿か?』と思われるかもしれませんが、ご回答お願い致します。

Aベストアンサー

太陽に近い、遠いの前に気圧が関係しています。冬に缶コーヒーの蓋を開けないまま直火にかけると強烈な音とともに破裂してしまいます。これは缶の中の空気や水分が暖められて膨張し体積を増して缶の中の圧力が高くなった結果です。破裂する手前で缶を冷やしてやると中の空気が収縮し圧力は低くなる。逆に気圧を変えても同じことが起こります。気圧を高めれば温度が上がり、気圧を下げれば温度がさがります。(ボイル.シャルルの法則)
高い山に登ると気圧が下がるため100mにつき0.5度C下がります。1000mでは5度Cも下がることになってしまいます。

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&Aランキング

おすすめ情報