• ベストアンサー

エクセル2003 色のついたセルを含む列表示

 エクセル2003で、横長にデータがたくさんあるシートがあります。ほとんどがデータがなくデータのあるセルだけ色表示しています。横長で見づらく、この色付のセルを含む列だけを簡単に表示させる方法があるでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.2

こんにちは! >データのあるセルだけ色表示しています は条件付書式が設定してあるのでしょうか? もしそうであればマクロでも難しいと思います。 仮に手操作で色付している場合は↓のコードで大丈夫だと思います。 画面左下の操作したいSheet見出し上で右クリック → コードの表示 → VBE画面に ↓のコードをコピー&ペーストしてマクロを実行してみてください。 (Alt+F8キー → マクロ → マクロ実行です) Sub test() 'この行から Dim i, j, k As Long Application.ScreenUpdating = False For j = 1 To UsedRange.Columns.Count For i = 1 To Cells(Rows.Count, j).End(xlUp).Row If Cells(i, j).Interior.ColorIndex <> xlNone Then k = k + 1 End If Next i If k = 0 Then Columns(j).Hidden = True End If k = 0 Next j Application.ScreenUpdating = True End Sub 'この行まで ※ A列には何らかのデータが入っているという前提です。 もしA列にデータが入っていないと最終列の取得ができません。 ※ 条件付書式で色付されている場合は条件付書式を削除し、 マクロで条件付書式の条件を設定 → 色付け とすれば上記コードで大丈夫だと思います。 あまりお役に立てないかもしれませんが、 この程度で、ごめんなさいね。m(_ _)m

その他の回答 (1)

  • KURUMITO
  • ベストアンサー率42% (1835/4283)
回答No.1

色表示をしていない列を選択して右クリックし、「表示しない」を選択することで列を非表示にできますから色表示のある列だけを画面に並べることができます。

Misasage
質問者

補足

範囲指定とかをして瞬時に表示できないでしょうか。マクロを組む必要があるでしょううか。ご指導よろしくおねがいします。

関連するQ&A

  • エクセル 色つきセルのみの表示

    こんにちは いつもお世話になっています。 エクセル2003を使っています。 A列に文字データがあります。条件付書式で重複セルに色をつけてあります。 この色をつけたセルだけを表示させる方法を教えてください。 実際に色を付けてあれば検索で処理できるようですが、条件付書式でのやり方をネット上で探せませんでした。よろしくお願いします。

  • Excelの列の表示??

    Excelで、あるデータをもらいましたが、 シートの上の1行の列幅 例えば”A”列の幅が”B、C、D”まで広がっていて、 セルをAから横にひとつ移動するといきなり”E”列までとんでしまいます。 2行目からはセルA→B→C→D→Eと移動します。 ”A”列には一つに収まる文字しか表示してありませんが、色で表題の区別をするためか横に広がっているようです。 これを通常通りに移動できるようにするにはどうしたらよいのでしょうか?

  • エクセルで、非表示になっている列もコピー

    エクセルで、あるシートの一部の列が非表示になっています。 フィルターしている状態で行をコピーし、他のシートに貼り付けると、 非表示になっている列のセルが貼りつきません(可視セルのみコピーされます)。 いちいち、非表示列を再表示せずに、 すべての列を貼り付けるには、どうすればよいのでしょうか。 Excel2007

  • エクセル セルの色について

    エクセルについて教えてください。 セルに塗りつぶしで色をつける。 そのセルを移動すると色も移動してしまいます。 シート内に設定した各セルの色を固定にする方法を 教えてください。 他の人が作った表が 1行ごとにカラー、無色と交互になっていて  データを上下に移動しても 全体の配色は変わらないように なっていてこれはいいなと思ったのですが やり方がわかりません。 よろしくお願いします。

  • excel 参照しているセルに色がついていたら、返すセルにも色もつける

    excelの詳しい方、ぜひ教えてください! Sheet1にあるデータを、計算式によってSheet2に参照させていますが、Sheet1のセルの色までは参照する事ができません。 計算式はいたって簡単で、例えばSheet1のA1を参照している時は、Sheet2のセルに =Sheet1!$A$1 と計算式を入力しています。 条件付き書式や関数も考えたのですが、 ”もし、参照しているセルに色がついていたら、返すセルにも色もつける” をどうすれば出来るのかわかりません。 どうか、わかる方ぜひ教えてください。お願いします!!

  • Excelで1つのセルに入れた複数行の長い文字列をセルの高さを変えずに表示したい

    こんにちは。 Excelについての質問です。 お分かりになる方がらっしゃいましたら教えていただけると幸いです。 Excelのシートに、何行かにわたる長い文字列をコピーしたものを 1つのセルに貼り付けて、全て表示させたいのです。 その時、シートの幅や高さは変えずに、 セル内で「Alt+Enter」で改行されてその高さに収まらない文字列は、 そのまま直下の空いているセルに表示させたいのですが、これは可能でしょうか。 「折り返して全体を表示する」はオフの状態です。 この設定で1行だけの文字列だと幅以上の文字列は自然に横の空白のセルに流れてくれますよね? これを、「Alt+Enter」の複数行ver.でやりたいのですが、 このようなことは可能なのでしょうか。 質問が分かりにくくて申し訳ありません。 他にも、いい方法をご存知でしたらアドバイスをお願いいたします。

  • エクセルで自動で列を反転表示することはできますでしょうか?

    エクセルのシート上で、マウスの動きに合わせて列全体が薄いグレー色などの色に変わるようにできますでしょうか? 列や行ごとに関連する大事なデータがあり隣のセルと間違えて見ないように一列、一行に色が付いてくれるとうれいしのですがいちいちエクセルの端をクリックして行や列全体の選択をするのがめんどうなもので。。。。マウスポインタがある行や列の色が自動で変わってくれると同時に結果的に選択されたような表示になってくれると助かります。 こういう動きをネットなどでも見かけるのですが名前がわからないのと エクセルのVBA等でできるのかどうかを教えて頂きたいと思います。 ご存じのかたいましたら宜しくお願い致します。

  • エクセルのセルが表示されない

    エクセル2002を使用していますが、エクセルファイルを開くと、ツールバーは正常ですが、セル部分は全体が灰色に表示され、ワークシートが表示されません。直接ファイルを開けないため、エクセルファイルを立ち上げ(ワークシートおよびセルは異常なし)、ツールバーの「ファイル」から「開く」で、開きたいファイルを選択すると開けます。直接ファイルを開く設定方法を教えて下さい。

  • エクセルのセルの文字列を表示する

    エクセルの1つのセルに箇条書きで(例えば5行) 表示したいのですが、その場合自動的に業が増えれば、 フォントが小さくなるようにしたいのですが。 「セル」の「書式設定」で「配置」の「セルを結合して」と「折り返して全体を表示」にすると数式バーには表示されますがシートを見たときに表示されません。 エクセルのシートに箇条書きを全部表示させる為の方法を教えて下さい。 行の高さは、変えれないのでその゛よろしくお願い致します。

  • Excelでセルを選択したら行と列に色がつくなんていう方法?

    いつもお世話になっております。 Excelで質問です。 現在A3の用紙に細かいセルでたくさんの行と列を作り、データを入れていっています。 真中の方のセルになると、行と列の文字が太字にはなっているんですが分かりにくくてしょうがありません。 セルを選択したら縦横に色がつくなど分かりやすくする方法はありませんか? 分かりにくい文章で申し訳ありません。 よろしくお願いします。