• 締切済み

エクセル パターン化した挿入方法

よろしくおねがいします。 OS は、windowsXPです。 エクセル(2003)で、たとえば、 111   11 113 11 ・ ・ ・ ・ この列のなかに一行おきに挿入 111 この間に  11 この間に 113 この間に 11 同じパターンでたとえば、25個とかのデーターを、挿入したいのですが 何かいい方法は、あるでしょうか? 今まで、コピーをして貼り付けをしていたのですが、今回は 莫大な、データーで間違えてしまいました。 それで、やはり、ソフトの方で入力した方が、確実だと、感じています。 マクロでもかまいませんが、教えていただけないでしょうか。 これから、マクロも勉強したいと思いますが、 先に、かたずけてしまいたいので、よろしくお願いします。

みんなの回答

  • bin-chan
  • ベストアンサー率33% (1403/4213)
回答No.2

現在のデータが列Aと列Bとし、それに加え、2列を使用します。 列C,列Dを用いることにします。 1)現在あるデータに1~n行の連番を付与。(列C) 2)現在あるデータに識別用にすべて1を付与。(列D) 3)列Cに付与した1~n行の連番をコピーしてn行+1に貼り付け(これも列C) 4)3)の列Dに値2を設定(入力でもコピペでも)(列D) 5)列A~列Dを選択して、メニューのデータ>並べ替えをクリック。 6)並べ替えのキーを 列C 列Dの順にして OK ワークシート上で実現可能です。「マクロの記録」を行えばVBAのソースも生成されます。

bakuksjp
質問者

お礼

ありがとうございました。 まだ、理解できていませんが、落ち着いてやってみます。

全文を見る
すると、全ての回答が全文表示されます。
  • dodemoii
  • ベストアンサー率59% (769/1282)
回答No.1

こんにちは 1行おきに空セルを挿入する場合なら 下記のような方法があるようです。 http://www.h3.dion.ne.jp/~fukusima/waza/ura050.html http://www.nbcom.co.jp/PC-Support/FAQ/xls/ht/xls042005ht001.shtml # これを応用すればできると思います。 では。

bakuksjp
質問者

お礼

遅くなりましたが、ありがとうございました。 とりあえず、参考に、やってみます。

bakuksjp
質問者

補足

遅くなりました。 回答ありがとうございました。 参考になりました、たしかに、一行ごとの挿入はできました。 しかし、大変言いにくいことですが、私の説明不足のようで、 失礼ですが、再度聞いてください。 一行ごとの挿入だけでわなく、 一行ごとの前のセルの行をコピーして、24個の貼り付けと言えば わかって頂けるでしょうか? 111  111  111         ⇒ここに前の行(111の行をコピー)を24個とか同じパターンで、を貼り付けしたのです。    112  112  112            ⇒ここにも同じ 113  113  113            ⇒ここにも同じ 114  114  114            ⇒ここにも同じ 115  115  115            ⇒ここにも同じ 116  116  116            ⇒ここにも同じ 117  117  117            ⇒ここにも同じ 118  118  118            ⇒ここにも同じ 119  119  119            ⇒ここにも同じ 120  120  120 これで、わかるでしょうか? すいませんが、教えてください。

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

関連するQ&A

  • Excelの非表示列も含めてコピー

    Excelのデータを別シートにコピーします。 コピー対象には非表示列も含まれていて 非表示列も含んだデータコピーはできているのですが、 貼付け時には非表示になっているデータは表示されて貼付けされます。 これを非表示だった列は非表示のまま貼り付けることは出来ないでしょうか? マクロを使ってコピー貼付けを行います。 よろしくお願いいたします。

  • EXCELのマクロにて

    EXCELのにて連続したデータを入力したデータベースがあります。(行が5000、列がAAまで) このデータベースのデータの最終行だけを指定して違うシートにコピー・貼り付けがしたいのです。 マクロにてこのような作業をするときにはどういった文をかけばよいですか。

  • Excel強制終了

    仕事で使っているExcelのブックがあります。 ある1列に入力しようとすると必ずエラーがでてExcelが強制終了されてしまいます。 いろいろ試してみたもののどうにも変わらず困っています。 どなたか原因がわかるかたもしいらっしゃいましたら教えてください。 以下のような感じです。 エラーの文章 『問題が発生したためMicrosoft Office Excelを終了します。ご不便をおかけして申し訳あ りません。 作業中の内容は失われた可能性があります。Microsoft Office Excelで、作業内容の回 復を試みることができます。 □作業内容を回復しMicrosoft Office Excelを再起動(R) この問題をMicrosoftに報告してください。 ~~~~~     』 ■バージョン WindowsXP Excel2003 ・A列からR列までで500行ぐらい入っているデータ ・オートフィルタを使っている ・その列だけオートフィルタの▼ボタンを押すとエラーがでる ・オートフィルタを解除しても文字を入力するとエラーがでる ・空白行もある ・入力するセルの上下1行以上空いていると入力できる ・入力するセルの上下どちらかにでも文字が入っていると入力できずエラーになる ・現在すでに文字が入力されているセルにも入力できない ・その列の左右の列などには普通に入力できる(異なるのは文字数ぐらい) ・マクロなどは使っていない ・書式は罫線と中央ぞろえのみ 試してみたこと(○がうまく行った操作 ×がエラーになった操作 ×再起動 ×別の名前を付けて保存 ×その列の適当な一箇所をそこだけコピーして別のブックに貼り付け ×別の場所に中身をコピーし、列を削除。  その後新しい列を挿入しなおし、よせておいたデータを値だけの貼り付け ×シートすべてをコピーして新規ブックに値だけの貼り付け ○別のセルに文字を入力しておいてコピーしてその列に貼り付ける

  • Excelでお尋ねしたい事があります。

    エクセルのデータを下記のようにするのに 良い方法があれば教えて下さい。    A   B         A   B   C   D  1 AAA 100      1 AAA 100 101 102 2 AAA 101  ⇒   2 BBB 100 101 102 3 AAA 102      3 CCC 100 101 102 4 BBB 100      5 BBB 101 6 BBB 102 7 CCC 100 8 CCC 101 9 CCC 102 A列にある同一のデータを一行にして B列のデータを一行にした列に持っていく作業です。 現在は、A列にある同一データのB列をコピー。 行列を入れ替えて貼り付け。 B列が空いた所を行事削除しています。 このデータが何千とありまして… 延々とコピー、貼り付け、削除。 をしています。 何か良い方法があれば教えて下さい。 よろしくお願いします。

  • これなんのエラーですか

    すいません よろしくおねがいします 32列 行2182エクセルの表計算で集計(コピー 貼り付け 並び替え)は一部マクロにしているんですが 一行増やすことになり  マクロを解除して 一行増やしてからまたマクロにしょうとしましたら Microsoft visual Basicの窓が出て 以下のメッセージ 固定長文字型や静的変数のデーターの大きさは64KBを超えることができません  とでました どうゆうことでしょう マクロできません 

  • エクセルの行挿入について

    ↓行 列→ 1 タイトル・・・ --------------<ここに行挿入したい 2 data1 3 data2 4 data3 一行目にタイトルがあって、2行目以降にデータが あります。 タイトルにすぐ下に行を挿入したいのですが 2行目にカーソルを合わせ、挿入/行、とすると 一行挿入されますが、形式というか属性というのか その形式が1行の形式を持って挿入されます そのため、タイトルの色がついたものが挿入されます これを 2行目以降の形式(白い)でタイトルのしたに 挿入できないでしょうか 現在は 3行目に挿入して(色のつかない行が入る) 2行目にある行を3行に切り取りコピーして 2行目の白い行を挿入しています

  • エクセルで複数行のデータを1行にする方法

    エクセルで複数行のデータを列挿入--切り取り--貼り付けで1行にしたいのですが、 その様なセルの並びが沢山あります。 VBAマクロなどで一度に出来る方法が有りましたらどうか教えて下さい。 データはこんな感じです。 ┌─┬─┬─┬─┬─┐ │01│04│07│10│13│ ├─┼─┼─┼─┼─┤ │02│05│08│11│14│ ├─┼─┼─┼─┼─┤ │03│06│09│12│15│ ├─┼─┼─┼─┼─┤ │16│19│22│25│28│ ├─┼─┼─┼─┼─┤ │17│20│23│26│29│ ├─┼─┼─┼─┼─┤ │18│21│24│27│30│ ├─┼─┼─┼─┼─┤ この様に並び替えたいのです。 ┌─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┐ │01│02│03│04│05│06│07│08│09│10│11│12│13│14│15│ ├─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┤ │16│17│18│19│20│21│22│23│24│25│26│27│28│29│30│ ├─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┤ 何卒宜しくお願いいたします。

  • エクセル マクロでの行挿入は・・・・

    マクロを勉強中です。 特定の列の値(下の表では5列の『サブコード』です)が、 4~6 の時に、1行挿入し上の行のコピーを貼りつけ、 7~9 の時は、2行挿入して上の行をコピー貼りつけ・・・ という作業が、マクロでできますでしょうか? ご回答を、お待ちしております。 どうか、よろしくお願い致します (u_u)

  • エクセルで、ひとつのセルの中に文字列を挿入する方法

    エクセルのひとつのセルの中で、 「ABCD-0001」とあるところを 間に「○○-」を挿入して、「ABCD-○○-0001」にしたいのですが、マクロを試してみましたが、相対参照と絶対参照がよくわからず、最初の一行と同じになってしまいます。 (0001から数百あります) 「ABCD」を「ABCD-○○」に置換でもできるのですが、とりあえずマクロを使ってみたいと思って質問してみました。 よろしくお願いします。

  • EXCELの横列を挿入しながら縦列に並べ替え

    エクセルで横列に入力されている「サイズデータ」を基準になる品番毎に 縦列に並べたいのですが、その際品番をコピーして挿入のように入れたいのですが、可能でしょうか? さらに問題は品番毎にカラーが付いているのですが、それが同じ数ずつ ではないこと、またサイズレンジもSMLや28、29など種類があります。 (添付をご参考にされてください。) コピーして挿入していましたが、データが非常に多いので難儀しております。いくつかの数式を組み合わせれば可能なのでしょうか。 関数もいくつかしか使えず、マクロなどは使ったことがないレベルなので 大変恐縮なのですが、お教え頂けますでしょうか。