• 締切済み

データ分類と罫線作成

windous7 エクセル2010を使用しています。 約50000行×5列の1列に8桁のコード番号があるシートがあります。これを番号順に並べ替え同一コード番号を有する行は1つのグループとして示すため、異なるコード番号との境に罫線を引き、最終的には全てのコード番号順一覧表としてに印刷する必要があります。 同一コード番号を有する行の数は定まっておらず、1行の場合や30行程になる場合もあります。番号順はソートすれば、できることは分かるのですがグループを判断するには見て判断しながら罫線を引いていくしかないでしょうか?良い方法がありましたら教えて下さい。

みんなの回答

  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.1

たとえばA列がコード列だとして。 (必要に応じて)縦線はふつーに上から下まで通しで引いておきます 横線は全部なしにしておきます A1からE5000まで表範囲を選択 A1がアクティブセルになっていることを「必ず」確認してから ホームタブの条件付き書式▼で新しいルールを開始 数式を使用して…を選んで =$A1<>$A2 と記入、 書式ボタンの罫線タブで下罫線だけを入れてOKOKします。

tyakituyo
質問者

お礼

お礼が遅くなり申し訳ありません。 質問直後からPCのネット接続がうまくいかず、本日復旧し拝見しました。ちょうど明日から質問内容尾の作業に取り掛かるところで、大変助かります。教えていただいた方法を一部で試しましたが、目視による作業では30分近くかかりましたが、入力の1分ほどで完了しました。ご丁寧にありがとうございました。

関連するQ&A

  • 【Excel】罫線の作成

    Excel2003を使用しています。 罫線を引く際、線を引きたいセルを選択して、罫線メニューから「外枠」や「格子」等のボタンを押せば、簡単に引くことができますが、同じようなボタンを独自に作ることはできませんか? 希望としては… 3行4列のセルに(例えばA1:D3とした場合) A1:D1→上罫線 A3:D3→上罫線+下二重罫線 複数のシートに渡って、この罫線を引くのですが、選択するセルが違うので、作業グループではできません。罫線メニューのボタンをクリックするのと同じような操作で、罫線が引けると嬉しいのですが。。。 よろしくお願いします。

  • Excel:  データを各シートへ振り分ける

    Excelでsheet1からsheet nまで準備されているものとします。sheet1として(2行1列目~50行2列目)までの表があってそれを1列目を昇順でソートしたとき数個のグループに分かれるものとします。またsheet nは事前にグループの分は充分用意されているものとします。 そこでソート後、そのシートを分かれたグループ仮にAAA,CCC,DDDと分かれたときに、sheet2にはAAAのグループを2行目以下へ転送し、sheet3にはBBBのグルーを2行目以下へ転送し、そしてsheet4にはCCCのグループを2行目以下へ転送するようにマクロ記述をしたいどのように記述すればいいですか。(マクロ実行はソート後実行します)

  • エクセル97の罫線について

    EXCEL97の罫線について教えてください。 マクロで、単純にデータのあるセルに罫線を引きたいと考えています。 ACCESSのデータをEXCELにエクスポートしてからEXCELのシートを開くので、 シートの列(横幅)はどれだけあるかわかりません。ちなみに行のマックス行の取得の仕方はわかっています。 現在、下のようなコードで5枚のシートに罫線を引いているのですが、すべてのシートが一枚目のシートの列行と同じだけ罫線が引かれてしまいます。 ========================================================== Public Sub get_keisen(sheet As String)  ←シート名が引数 Set ws1 = Worksheets(sheet) '罫線を引くシート Dim maxRow As Long '最大行 Dim I As Integer Application.ScreenUpdating = False ws1.Activate 'シートの最大行を得る ws1.Activate: maxRow = ws1.Range("A65536").End(xlUp).Row 'シートの横幅を得る I = 1 'デ-タ1行目設定 Do Until Cells(1, I) = ""   I = I + 1 Loop '罫線を引く範囲(全体)を選択 ws1.Activate: Range("A1:I" & maxRow).Select   ~ 罫線を引く処理文 ~ end sub =========================================================== もっと簡単な方法があればその方法でかまいません。 宜しくお願い致します。

  • 【Excel VBA】条件を満たすデータを順に抽出

    Excel2003を使用しています。 CSVでExcelに取り込んだデータの中から、条件を満たすものを順に抽出して一覧表を作成するマクロを作りたいのですが。。。 ・Sheet2のB列に“コード”と入力されている行のC列のデータ → Sheet1のC列2行目以下 ・Sheet2のC列に“合計”と入力されている行のD列のデータ → Sheet1のD列2行目以下 に順に表示させたいのですが、うまくいきません。 以前、いただいた回答で参考になりそうなものを見てみたのですが、手順というか何かヒントのようなものをいただけたら、自分でどうにかできそうなので、質問させていただきました。 よろしくお願いします。

  • 複数の検索値から任意のデータを抽出する方法

    Excelの質問です。 Sheet1には、1行1件のコード、地域、金額の表があります。 A列のコードは、同じコードはひとかたまりになっていますが、 同じコードが2行ある場合や、1行またはそれ以上ある場合と決まっていません(最大6行)。 また、コードの順も昇順・降順になっていません。 Sheet2には、A列にコードだけが入力してあり、コードをキーにして、 Sheet1から地域と金額を自動表示したいのですが、 MATCHやINDEX関数を組み合わせたりしたのですが、うまくいきません。 関数式をお教えください。 <Sheet1> A B C →列番号です。 コード 地域 金額 56789 東京 100 56789 大阪 50 12345 大阪 400 12345 神奈川 200 12345 東京 1000 22222 大阪 300 22222 神奈川 400 22222 東京 100 ・・・・・つづく <Sheet2> A B C 12345 大阪 400 →B列とC列を数式で自動表示したい 神奈川 200 東京 1000 56789 東京 100 大阪 50 22222 ・・・・・つづく

  • VBAを使った、Excelでのシート間データ抽出

    はじめまして。みなさまどうか教えてください。 Sheet1にはA列に250行程、コードが存在します。 Sheet2にはA列(コード)からI列まで、そして1000行程データが存在します。 Sheet1にあるコードは重複はなく、Sheet2のコード内に必ず同じコードがあります。 Sheet2にも重複コードはありません。 そこでSheet1のコードを使い、Sheet2を検索し、同一コードのデータ(A列からI列の行すべて)を全て(250件分)、Sheet1のコード記載順(A1、A2、A3・・・・)で、Sheet3に抽出したいのです。 どうか、よろしくお願いします。

  • 一度に罫線をひくやりかた

    Excel2007で教えてください。 A-D列、1-28までの罫線を外枠をつけてつくりたい。 が、やりたいことは3行目に罫線をひいたら、つぎは、 5行目に罫線をひきたい。つまり、一段あけて罫線をひきたい。 それを一度にできるやり方が知りたいのです。 やはり、そういったやり方がない場合は、 手作業で、罫線をひくしかないのでしょうか?

  • EXCEファイルを開くと、勝手に罫線が入っていた

    こんにちは。EXCELファイルを開くのに困っています。 人からもらったEXCELファイルを開くと、時間がかかってしまい、 何をするにも応答なしになってしまいます。 最後のセルを調べてみると、何も入力されていないはずの場所に 勝手に罫線が入っていました。 例えば、作成された行は、50行ぐらいなのに、1000行以降から、罫線が 引かれています。シートの最終行まで。 作成された列も40列ぐらいなのに、80列以降から罫線が引かれています。 シートの最終列まで。 もらった方も、同様の事で困っています。なぜこのようになったかわかりません。 今後は、このような事にならないような対策が知りたいです。 どなたかお判りの方がいらっしゃったら教えてください。 作成したファイルは、EXCEL2007です。

  • マクロを使って文字列を分類したい。

    マクロを使って、次の処理を行うマクロを作りたいのですが、 まず、漢字・ひらがな・カタカナ・数時・アルファベットを識別するコードの抽出方法と、コードの一覧がわかりません。 それから、文字列の処理の関数がなかなか思いつきません。 2年ほどマクロを使っていません。エクセルも2007になり、かなり勝手が違います。 できれば、マクロを示していただければありがたいのですが、 重要なヒントを示していただいても構いません。 ----------------------------------------------- セル(H、5)の中に、いろいろな文字列があります。 例えば、 「東京1月アメリカEUやまとChinaイギリス日本2009年おわり」 ですが、 これを 漢字をA列に1行から順に、 東京 月 日本 年 ひらがなをB列に1行から順に、 やまと おわり カタカナをC列に1行から順に、 アメリカ イギリス 数字をD列に1行から順に、 1 2009 アルファベットをE列に1行から順に、 EU China というように出力するマクロを作りたいのです。 よろしくお願いします。

  • エクセルの表引き?

    こんにちは いつもお世話になっています エクセルの表引きについて教えてください。 実は表引きといえるかどうかわからないので、できるか、できないかだけでも知りたいです。 sheet1に次のデータがあります。 A     B     C 1     秋田    a 2     愛知    a 3     石川    a 4     愛媛    b 5     大分    b 6     鹿児島   b 7     香川    c 8     熊本    c A列は連番とは限りません、重複データはありません。 C列でグループ分けしてあり、第一条件でソートしてあります。 sheet2ではA列に10行ごとに黒枠罫線がひいてあるだけで、ほかにデータはありません。 この枠線の中にsheet1のC列のグループごとにA列のデータを振り分けたいのです。 sheet1のC列は昇順でソートしてありますのでsheet2へも、その順番で各枠線内の上から入力させたいです。 sheet2のA列へはC列のa,b,cの各データの個数より余分に枠罫線がひかれてあるので、入りきらないことはありません。 つまり、 sheet2に A 1 2 3 7行分空白(ここまで枠罫線) 4 5 6 7行分空白(ここまで枠罫線) 7 8 8行分空白(ここまで枠罫線) と入力させたいのです。 関数とか表引きではできないとすると、他の方法はあるでしょうか。 条件付書式でもできるでしょうか。 わかりづらい表現で申し訳ないですが、よろしくお願いします。

専門家に質問してみよう