エクセルの行挿入で複数行に複数行を挿入したい

 ◇-?エクセルの行挿入で複数行に複数行を挿入したい-will-10/06-09:53(109)-No.375297
 　 ┣?!Re:エクセルの行挿入で複数行に�...-汚やぢ-10/06-11:30(107)-No.375309
 　 ┃ ┗?!【解決】Re:エクセルの行挿入で�...-will-10/06-12:18(106)-No.375315
 　 ┗?!Re:エクセルの行挿入で複数行に�...-白茶-10/06-11:49(107)-No.375313
 　 　 ┗?!【ありがとう】Re:エクセルの行�...-will-10/06-12:23(106)-No.375317

「何か一言」を読む Facebookコメントができます

▲このページのトップに戻る

375297	エクセルの行挿入で複数行に複数行を挿入したい	will	2006/10/06-09:53
メーカー名：NEC 日本電気 OS名：WindowsXp パソコン名：VY22X/RX-L ソフト関連：表計算Excel 使用回線：ISDN -- エクセルを使用しています。頂いたワークシートで7000行くらいのデータがあります。全てのデータに３行ずつ挿入したいのですが、一括で行う方法は無いでしょうか？１つの行に対して３行づつの挿入を行っていますが、時間が掛かるため、良い方法があれば教えてください。

▲このページのトップに戻る

375309	Re:エクセルの行挿入で複数行に複数行を挿入したい	汚やぢ	2006/10/06-11:30
記事番号375297へのコメントマクロの一例 http://pc.nikkeibp.co.jp/npc/download/morimoto_mm.html ただし、7000行に対してこのマクロを使うと気が遠くなるほど時間がかかります。マクロを使わない別法。データが入っている行を7000行として・・・仮に先頭に列を挿入します。データが入っている7000行に対し、「1,5,9・・・・」という連番を最終行までオートフィル機能を使ってつけます。 7001行目には「=A1+1」という式を入れます。 3行ずつ挿入するので上記の式を28000行め（7000の3倍の21000を加えたもの）までオートフィルでコピーします。そのままの状態（7001行めから28000行目までが選択されている状態）のA1列をコピーし、同じ場所に形式を選択で「値のみ」を貼り付けます。 A列を基準に昇順で並べ替えます。 A列を削除します。

▲このページのトップに戻る

375315	Re:エクセルの行挿入で複数行に複数行を挿入したい	will	2006/10/06-12:18
記事番号375309へのコメント汚やぢさんは No.375309「Re:エクセルの行挿入で複数行に複数行を挿入したい」で書きました。ありがとうございます。目からウロコが落ちました。こんな方法考え付かず、諦めて手作業で行うところでした。本当にありがとうございます。おかげで、土日月の３連休を無事に迎えられます。

▲このページのトップに戻る

375313	Re:エクセルの行挿入で複数行に複数行を挿入したい	白茶	2006/10/06-11:49
記事番号375297へのコメント willさんは No.375297「エクセルの行挿入で複数行に複数行を挿入したい」で書きました。こんにちは。 A列のデータをB列に３行飛ばしてあらわす関数の例として。 B1=IF(MOD(ROW(),4)=1,INDEX(A:A,INT(ROW()/4)+1),"") でA列のデータ数×４行目までフィルダウン。とか・・・。 INDEX関数は"参照返し"関数なので、計算速度も割と速いですよ。

▲このページのトップに戻る

375317	Re:エクセルの行挿入で複数行に複数行を挿入したい	will	2006/10/06-12:23
記事番号375313へのコメント白茶さんは No.375313「Re:エクセルの行挿入で複数行に複数行を挿入したい」で書きました。早速のお返事ありがとうございました。関数を使う方法も参考になりました。膨大なデータを最近よく扱うので、今後も参考にさせていただきます。

パソコントラブル解決・過去ログTOP > ログTOP > エクセルの行挿入で複数行に複数行を挿入したい

何か一言(本ページで参考になったならないを含めて残してあります)
◎：解決　○：参考になった　×：参考にならなかった　！：アドバイスあり

参考	回数	投稿日時	何か一言
検索	投稿あり	2007/09/18-07:45	左記[投稿あり]クリックにて検索(逆リンク調査)します同様の質問へのリンクとなっています
○	初めて	2011/12/02/(金) 19:04:32	MSIE7/WinXP