• ベストアンサー

Excelで行番号に応じての処理

よろしくお願いします。 C列に3行ごとに規則正しくみっちり1000行ほどの文字列があります。 1 品番 2 商品名 3 備考 4 品番 5 商品名 6 備考 7 品番 自動的に2つの処理をしたいのですが、わからなくて困っています。 いずれもC列をD列にコピーするときの処理です。 1) 行番号が3の倍数のときにはコピーせず(空白)、1と2との時はコピー。 ※品番と商品名だけをコピー 2) 品番だけ、フォントを変えたい よろしくお願いします。※Excel2007です

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

  • ベストアンサー
  • cj_mover
  • ベストアンサー率76% (292/381)
回答No.5

なんか違和感があるので戻ってきましたが、 数式で対応するのなら、  1)D1のフォントを変更  2)D1:D2を選択  3)数式 =C1 を入力して、Ctrl+Enterで確定  4)D1:D3を選択  5)下方向に必要な行数フィルコピー でよいのでは? 私は、 "コピー"というのは言葉通り「コピー&ペースト」 "自動的に"というのは「行番号に応じ]の部分を自動化する というように読めましたので、回答No.3でレスしています。

unitty
質問者

お礼

大変参考になりました。 ありがとうございました。m(__)m

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (5)

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

>いずれもC列をD列にコピーするときの処理です。 という事なら。 手順: D1に =C1&"" と記入する。更にフォントを設定しておく D2に =C2&"" と記入する D3は空っぽにしておく D1:D3を選択し、下向けにつるつるっとオートフィルドラッグする で完成です。

unitty
質問者

お礼

大変参考になりました。 ありがとうございました。m(__)m

全文を見る
すると、全ての回答が全文表示されます。
noname#204879
noname#204879
回答No.4

添付図参照 1.セル D1 に式 =IF(MOD(ROW(),3),C1,"") を入力して、此れを下方にセル D3 までドラッグ&ペースト 2.セル D1 のフォントを変更 3.範囲 D1:D3 を下方にズズーッとドラッグ&ペースト

unitty
質問者

お礼

大変参考になりました。 ありがとうございました。m(__)m

全文を見る
すると、全ての回答が全文表示されます。
  • cj_mover
  • ベストアンサー率76% (292/381)
回答No.3

こんにちは 何度も同じ作業を繰り返す必要があるなら、 マクロ(VBA)で対応することになるでしょうけれど、 (↑それならそれで相談してください) シートづくりの方法は色々知っておいた方がよいですから、一例として 応用し易い方法として、一次的に作業シートを使う例を紹介します。 1)まずは、C列からD列へ、普通に、コピペします。 2)新しいシート(作業シート)を挿入します。 3)作業シートの    D1 に 数値の 1    D2 に 文字列の '1   を入力します。 4)作業シートの    D1:D3 を選択した状態から    下方向に必要な行だけフィルして連続データを作成します。  ※数値、文字列、空白、の3値のパターン繰り返しを作れば良いだけなので   方法はなんでもいいですし、行数は多めで構いません。   やり方によっては、3の倍数行、でないとうまくいかないのでご注意を。 5)作業シートと元の(編集対象)シートをグループ化します。    作業シートが選択されている状態から    Ctrlキーを押しながら、元のシートのシートタブをクリックします。  ※見た目では余り変化ありません。(シートタブがちょこっと変化) 6)D列をまるごと選択して    F5キー、で ジャンプ を表示    [セルの選択]→[空白セル]にチェック→[OK]  ※備考の行のみ、すべて選択されます 7)そのまま、DELキー。  ※備考の行だけを消去しました。 8)D列をまるごと選択して    F5キー、で ジャンプ を表示    [セルの選択]→[定数]にチェック→[文字列]のチェックを外す→[OK]  ※品番の行のみ、すべて選択されます 9)品番の行に対してフォント変更。 10)作業シートを削除  ※バッサリいっちゃって構いません。 以上です。

unitty
質問者

お礼

大変参考になりました。 ありがとうございました。m(__)m

全文を見る
すると、全ての回答が全文表示されます。
回答No.2

D1: =IF(C1="","",IF(MOD(ROW(),3)=0,"",C1)) +条件付き書式の数式: =IF(MOD(ROW(),3)=1, 1, 0) 以下、コピー

unitty
質問者

お礼

大変参考になりました。 ありがとうございました。m(__)m

全文を見る
すると、全ての回答が全文表示されます。
回答No.1

D列数式  =IF(ROW()/3=ROUNDDOWN(ROW()/3,0),"",$C1) D列条件付き書式(数式指定)  =IF(MOD(ROW(),3)=1, 1, 0)  の時に、太字設定 D1にこれらを設定して、D2以降にコピればいいです。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • エクセル マクロ VBA

    エクセルのマクロについて質問です。 『集計』というブックの『集計開始』というシートに     A列    B列     C列 1行目 見出し  見出し   見出し      (商品名)  (支店)  (個数)         2行目 コメント  空白     空白   3行目 空白   空白     空白 4行目 商品名  支店     個数  5行目 空白   空白     空白 6行目 空白   空白   コメント1 7行目 空白   空白     空白 8行目 空白   空白   コメント2 9行目以降    上記のデータ(見出しを除く)の繰り返し というデータが入っています。 B列の中に『AAA』という文字が含まれていたら、そのセルを空白に置換し、 含まれていなかったら、そこで処理がとまったりエラーが出たりしないで次のステッップへ進み、 C列の中に『B』という文字が含まれていたら、そのセルを空白に置換し、 含まれていなかったら、そこで処理がとまったりエラーが出たりしないで次のステッップへ進み、 (今は、手作業で編集→置換→検索する文字列の中に『B*』と入力し、 置換後の文字列を空白にしてすべて置換ということをやっています。)                            ABC列(データーの入っている行まで)の空白を含む行を一括削除し、 以下のような形にしたいのです。     A列    B列     C列 1行目 見出し  見出し   見出し      (商品名)  (支店)  (個数)         2行目 商品名  支店     個数  3行目 商品名  支店     個数          ・         ・ このようにするマクロ文はどのようになりますでしょうか?

  • エクセルで、フィルタでデータを抽出した値を表示させるには・・

    仕事でexcel2000を使っています。 例えば、3行目より、a列に社名 b列に番号 c列に商品名が入っているとします。オートフィルタで、番号を一つ選ぶと、社名と商品名も表示されます。その表示された社名を、1行目に自動的して表示させえるにはどうしたらよいでしょうか?(宛先としたいのです)フィルタで抽出されるデータなので、毎回、出てくる会社が違うし、手で入力するかコピーすればいいのでしょうが、処理件数が多いと面倒だったりするもので。何か、簡単に出来る数式もしくは方法があれば教えてください。 よろしくお願いします。

  • ExcelのVBAについて

    ExcelのVBAについて VBA全くの初心者です。 以下のような処理を行いたいのですが、どなたかご教授をお願いします。 以下のように支店(1)~(3)のシートがあります。 1.入力シートに調べたい商品No・商品名・備考を入力する(複数行あり) 2.マクロを実行すると、商品Noを検索対象として支店(1)~(3)シートをチェックし、   一致しない行を不一致データシートに出力する もう一つ別のマクロで、 1.入力シートに調べたい商品No・商品名・備考を入力する(複数行あり) 2.マクロを実行すると、商品Noを検索対象として支店(1)~(3)シートをチェックし、、   一致する行を一致データシートに出力し、D列に対象データがあるシート名を表示する   ※可能でしたら、E列に対象データがある行番号も表示する -------------------------------- シート名:支店(1) A      B     C 商品No   商品名   備考 011    商品A   備考A 009    商品B   備考B 015    商品C   備考C -------------------------------- シート名:支店(2) A      B     C 商品No   商品名   備考 008    商品A   備考A 023    商品B   備考B 004    商品C   備考C -------------------------------- シート名:支店(3) A      B     C 商品No   商品名   備考 007    商品A   備考A 033    商品B   備考B 018    商品C   備考C -------------------------------- シート名:入力シート A      B     C 商品No   商品名   備考 ※ここに複数行入力する -------------------------------- シート名:不一致データシート A      B     C 商品No   商品名   備考 ※ここに出力される -------------------------------- シート名:一致データシート A      B     C 商品No   商品名   備考 ※ここに出力される

  • エクセル関数について

    質問です。下記のようなデータ管理をしているものがあり 集計を出したいのですが、うまくいきません。 1行目 A列   B列  C列 2行目 商品ID  商品名 商品名2 3行目 111   りんご   4行目 222   みかん  愛媛 5行目      すいか   6行目 222   みかん 7行目 444   いちご  熊本 8行目 空白予備列 9行目 空白予備列 10行目 空白予備列 条件:C列商品名2が入っていないもので A列商品IDが入っているものだけの数もしくはA列商品IDが入っていないものの数をカウントしたいのですが全セルを指定すると、空白予備列の空白までカウントされてしまいます。なので、条件としてはB列商品名が入っていてA列商品IDが入っているものだけの数もしくはA列商品IDが入っていないものの数をカウントしたいのですが、 何か良い方法はありますか? 色々やってみたんですがなかなかうまくいきません。 空白予備列を作っているのは今後どんどん増えていくので その為にいちいち範囲指定を行うのは面倒なので、 上記で出来る方法があればその方法でやりたいです。 どうか御願いします。

  • EXCELで自動で行が挿入できますか?

    EXCEL2000を使用しています。 1.下記のようなプロジェクトリストを作成しています。 A列:プロジェクト B列:試験 C列:施設名 2.C列に施設名を入力すると、自動的に行の挿入ができるようにしたい。 3.試験が決定されると次々と施設が決まっていくため、予め、施設名を入力することができません。 4.その都度、行の挿入を行えばいいのかもしれませんが、複数の方が入力するため、自動的にできたらいいなと考えています。 厄介な質問で申し訳ありませんが、何かよい方法はありますでしょうか? どうぞよろしくお願いいたします。

  • Excel で3行目、6行目、9行目と削除したい

    こんにちは。エクセルについて教えてください。 今、単語帳を作ろうと思っているのですが、邪魔な行があるので、それを削除したいのです・・・。 ↓ 1.日本語 2.英語 3.削除したい単語(1) 4.日本語 5.英語 6.削除したい単語(2) と入力されています。私が削除したい単語は1から1200個(行)ほどあるのですが、規則性はありません(数式でもありませんし、同じ単語が並んでいるわけでもありません)。削除したい単語が延々と3の倍数の行にあるだけです。 「3の倍数の行だけ削除する」ということはできるのでしょうか。教えてください。ちなみにExcel2003です。

  • Excel 行又は列単位で… 処理重い

    Excel2007 処理が重くなって困ってます。 行幅や列幅、セル書式などを移すのに 条件を指定してコピー よく使うのですが 列、または行をコピー元としたペーストをすると 途端に処理が重くなります。 不使用セルを全て 行単位、列単位で 内容削除でなく、セル削除し 一旦保存してExcelを終了 開き直しても変わりません。 以前2003から乗り換えた環境時は 直前の変更に関連しないセルの演算、 つまり、すでに演算が一度終わっていて 変化する可能性が少ないセルの演算 これを省略してくれているように感じていたのですが、 今回、この機能が切れているように感じます。 行、又は列をコピー元としたペーストを利用しつつ 処理の鈍重化を防ぐ対策、 ご教示をお願いします。 有効な設定等ありますでしょうか…

  • Excel 指定行までコピーをおこないたい

    Excel2003を使用しています。式のコピーを行いたいです。例えばA列に1,2,3...1000とデータがあります。C列に"=A1"と式をいれてA列の値をC列に表示します。ドラッグして1000行目までもっていって式をコピーできるのはしっています。 これが54392行目まで同じことをしたいとしたら、ドラッグするのは非常に手間です。そこで指定の行まで一気に式をコピーするといったことはできるのでしょうか?

  • EXCEL VBA 条件による空白挿入

    EXCEL2003を使っています。 以下のように列FGHが空白の行については列ABCを空白を挿入したいのですが数万行あり処理をVBAで自動化したいです。どなたかお力をお貸し下さい。お願いします。 A B C D E F G H 1 1 2 3 4 5 6 7 8 2 1 2 3 4 5 _ _ _ 3 1 2 3 4 5 6 7 8 4 1 2 3 4 5 _ _ _ 5 1 2 3 4 5 6 7 8 ↓ A B C D E F G H 1 1 2 3 4 5 6 7 8 2 _ _ _ 1 2 3 4 5 3 1 2 3 4 5 6 7 8 4 _ _ _ 1 2 3 4 5 5 1 2 3 4 5 6 7 8

  • エクセルを用いて商品データを処理しています。

    エクセルを用いて商品データを処理しています。 ある特定の列に「-(ハイフン)]が含まれるものがあり、 その行を毎回手作業 検索などで見つけて その後 その行をコピーしたりしてなど下記処理を行っているのですが、 この作業をVBAなどで簡単に行える方法を教えて下さい。 ・行数は毎回不定。 ・列の数は固定で特定文字が含まれる列も毎回同じ。 ・特定の列には半角英数で製品の管理番号が入っており、  例えば0001とか00466など入っていて、その中で0001-0023みたいに[-]で  くくられたものを探して、その行をコピーしてから  上の行(元々の行)の特定文字が入っていた箇所に前の製品番号(0001)、  コピーして挿入した次の行にはうしろの製品番号の0023を列に入れ  それ以外の内容はもともとの行の内容をコピーしたものにする。 列の項目は、左から管理番号,商品名,管理番号,数量・・・固定項目で30項目ぐらい それぞれの行に半角8桁,全角半角混在,半角英数と一部に-くくり,半角・・・ 行数は処理するカテゴリによって増減あり。 このC列の管理番号に含まれる[-]でのくくりをバラバラにして処理みたいな感じです。 この繰り返しを行う方法です。 もちろん条件書式などで色つけしたりして探してはいるのですが、 コピーして書き換えて・・・の処理が多いので大変困っているのでお願い致します。

専門家に質問してみよう