[[20121220165819]]　『複数行を個別に選択する便利ワザって？』（はんきょ）　ページの最後に飛ぶ

『複数行を個別に選択する便利ワザって？』（はんきょ）

 多くのデータの入った表を加工しようとしています。
 具体的には、特定の条件を満たすデータの入ったセルの下に
 空白を一行入れたいのです。

 これまでだと、

 １．オートフィルタで条件（・・・を含むセル、など）を設定してフィルタ
 ２．フィルタされた行をctrlを押しながらひとつずつ選択
 ３．全部選択したら右クリックから行の挿入を実行
 ４．フィルタ解除

 のようにやってました。

 データ量が増えてきて、手順２の手間が尋常でなくなってきました。
 何か便利なワザってありますか？

 できればマクロ以外が希望ですが、マクロしかなければそれも可です。

 アドバイス願います。

 Excel2010
 Windows 7

 (1)作業列(Aとすると)を挿入し、A1=2、A2=4 で範囲にオートフィル(データ範囲に偶数が入った状態)
 (2)フィルタで抽出した範囲のA列をコピーして、データの末尾以下に追加。
 (3)適当なセルに1 を入れてコピー、(2)で貼り付けた範囲を選択して、形式を選択して貼り付けで加算
 (4)フィルタを解除後A列で並べ替えて、A列削除
 といった手順でどうでしょうか。
 (Mook)

 できました！

 > 形式を選択して貼り付けで加算

 この機能を初めて使いました。
 偶数が入った作業列と組み合わせて、こんな風に使えるんですね。
 勉強になります。

 他のやり方もありましたら皆様お願いします。

 （はんきょ）

 手順2については条件に基づいて抽出した行を一行ずつではなく上から下までまとめて選択し、
 Ctrl + G →セル選択→可視セルにチェックを入れてＯＫ→右クリック挿入でできませんか？
(Jera)

 すごい！できた！

 こんなのあるんですね。目からウロコです。
 可視セル以外のオプションについても勉強してみます。

 Mookさん、Jeraさん、どうもありがとうございました。

 (追記)
 ・・・と、気付いたのですが、可視セルのみ選択するやり方だと
 フィルタ条件に該当するセルが２つ以上連続した場合、空白が
 各セルの上に1行ずつ入るのではなく、まとめて入ってしまいます。

 そのあたりはMookさん流だと回避できますねー。

 状況に応じて使い分け、というところでしょうか。

 （はんきょ）

 オートフィルタを使わないので、実状に合わないかもしれませんが
 たとえば「計」を含む行だったら
 図1	[A]	[B]	[C]		 図2	[A]	[B]	[C]
[ 1]		品名	数量		[ 1]		品名	数量
[ 2]	0	AAA	1		[ 2]	0	AAA	1
[ 3]	0	AAA	2		[ 3]	0	AAA	2
[ 4]	0	AAA	3		[ 4]	0	AAA	3
[ 5]	0	計AAA	6		[ 5]	0	計AAA	6
[ 6]	1	BBB	4		[ 6]	0		
[ 7]	1	BBB	5		[ 7]	0	BBB	4
[ 8]	1	BBB	6		[ 8]	0	BBB	5
[ 9]	1	計BBB	15		[ 9]	0	BBB	6
[10]	2	合計	21		[10]	0	計BBB	15
[11]	3	　以上			[11]	1		
[12]	0				[12]	1	合計	21
[13]	1				[13]	2		
[14]	2				[14]	2	　以上	
[15]	3				[15]	3		
[16]	4				[16]	4

 A2セルに　=IF(B2="",COUNTBLANK(B$1:B1),IF(COUNTIF(B1,"*計*"),A1+1,A1))　の式を入れてたくさんフィルドラッグ・・・・・図1
 A列で並べ替え・・・・・図2

 (HANA)

コメント返信：

[ 一覧(最新更新順) ]

[[20121220165819]] 『複数行を個別に選択する便利ワザって？』（はんきょ） ページの最後に飛ぶ

[[20121220165819]]　『複数行を個別に選択する便利ワザって？』（はんきょ）　ページの最後に飛ぶ