初めて投稿します。よろしくお願いいたします。
EXCEL2000を使用しています。
オートフィルタを使わずに
関数でデータを抽出する方法で悩んでいます。
下記<データ>が存在しています。
2行目がゼロ以外のものを、
別シート<抽出>に上から詰めて抽出したいのです。
<データ>
A列 B列 C列 D列 E列
1行 1 2 3 4 5 ←日付
2行 5 3 0 2 0 ←数字
<抽出>別シート
A列 B列
1行 1 5
2行 2 3
3行 4 2
↑ ↑
日付 ゼロ以外
関数については中級レベルだと思います。
いろいろ試したのですが、関数を組み合わせてもなかなかうまくいきません。
どなたかご教授いただけないものでしょうか?
よろしくお願いいたします。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
<データ> のあるシートを「Sheet1」、<抽出>別シート を「Sheet2」とします。
A)一発で抽出する方法(配列数式)
1)Sheet2 A1 に
=IF(ROW(A1)<=COUNTIF(Sheet1!$2:$2,">0"),INDEX(Sheet1!$1:$1,SMALL(IF(Sheet1!$A$2:$CV$2=0,256,COLUMN(Sheet1!$A$2:$CV$2)),ROW(A1))),"")
をコピペし、[Shift] + [Ctrl] + [Enter] で確定します。
2)Sheet2 B1 に
=IF(ROW(A1)<=COUNTIF(Sheet1!$2:$2,">0"),INDEX(Sheet1!$2:$2,SMALL(IF(Sheet1!$A$2:$CV$2=0,256,COLUMN(Sheet1!$A$2:$CV$2)),ROW(A1))),"")
をコピペし、[Shift] + [Ctrl] + [Enter] で確定します。
3)Sheet2 A1:B1 を選択、下方向にコピーします。
B)二発で抽出する方法
1)Sheet1 A3 に
=IF(A2>0,COLUMN(),"")
と入力し、これを右方向に必要分コピーします。
2)Sheet2 A1 に
=IF(ROW(A1)<=COUNTIF(Sheet1!$3:$3,">0"),INDEX(Sheet1!$1:$1,SMALL(Sheet1!$3:$3,ROW(A1))),"")
Sheet2 B1 に
=IF(ROW(B1)<=COUNTIF(Sheet1!$3:$3,">0"),INDEX(Sheet1!$2:$2,SMALL(Sheet1!$3:$3,ROW(B1))),"")
をコピペします。
3)Sheet2 A1:B1 を選択、下方向にコピーします。
No.1
- 回答日時:
<データ>のあるシートで
セルA3 : =IF(A2<>0,1,"") (B列以降もコピー。以下同じ)
セルA4 : =IF(A2<>0,COUNT(A3:$A3),"")
セルA5 : =A1
セルA6 : =A2
つぎに、
A列の10行目から下に、1から順に数字を入れる
9行B列に「2」、9行C列に「3」を入れる
セルB10に、 =HLOOKUP($A10,$A$4:$F$6,B$9,FALSE)
といれてC列もコピー、さらに下にコピーすれば<抽出>の
ようになります。
shiritaiさん、ありがとうございます。
とても速い回答で驚きました。
難しく考えていたので、これなら単純明快でわかりやすいです。
そうですよね~ 初心に戻った心境です。助かりました。
3行目、4行目に
行を追加できるかどうか、確認してから試してみようと思います。
完成したらご報告いたします。まずはお礼までです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelの関数でこんな処理ができますか 1 2023/02/08 13:46
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- Excel(エクセル) マクロか関数で処理したいのですが、教えて頂けませんか。 8 2022/10/31 15:18
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Excel(エクセル) Excelマクロの差分抽出のコードを教えていただきたいです。 2 2023/03/14 11:40
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
- Excel(エクセル) Excelの数式についての質問 1 2022/10/31 15:50
- Excel(エクセル) Indirect関数について、Formulatextで抽出した数式を参照したい。 1 2022/12/15 11:16
- Excel(エクセル) エクセルVLOOK関数について 3 2022/07/05 08:45
- Excel(エクセル) エクセル関数について 8 2023/06/28 17:04
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
表から0以外の数値を取り出し羅列したい
Access(アクセス)
-
【エクセル】関数で「A1が0でないならB1を表示」の式
その他(コンピューター・テクノロジー)
-
excelで、空白を除いてデータを抽出する方法について
Excel(エクセル)
-
-
4
初めて0以外の数値が出てきたときの値を表示(EXCEL)
Excel(エクセル)
-
5
エクセルで左から、最初に0より大きい値を抽出したい
Excel(エクセル)
-
6
エクセルで特定の列が0表示の場合、その行を非表示にしたい
Excel(エクセル)
-
7
エクセルで0を除いて昇順に並べ替えできますか
Excel(エクセル)
-
8
【エクセル】0以外が入力されていれば1を立てる計算式について
Excel(エクセル)
-
9
0のセルを含む行を除いて別のシートに表示したい
Excel(エクセル)
-
10
【Excel関数】UNIQUE関数で0"を返さない方法?"
Excel(エクセル)
-
11
エクセル if文で偽判定のとき、何も起こらないようにしたいのですが・・・
Access(アクセス)
-
12
SUMIF関数で、「ブランク以外を合計」を指定したい
その他(Microsoft Office)
-
13
エクセル空白以外の文字を抽出
その他(Microsoft Office)
-
14
E列のセルに数値が入れば(空白でなければ)B列の同じ行のセルに色がつく
その他(Microsoft Office)
-
15
Excel関数:「0」を除いた標準偏差の計算方法2
Excel(エクセル)
-
16
EXCELで2つの数値のうち大きい方を採択する数式
Excel(エクセル)
-
17
セルに値がある行のみを抽出するやり方
Excel(エクセル)
-
18
エクセルで入力のあるセルのみ別シートに表示したい
Excel(エクセル)
-
19
エクセルの空白を詰めて別シートに表示
その他(Microsoft Office)
-
20
Excel MATCH関数で検索範囲内に同じ値の検索値が複数ある場合
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル初心者です 関数の入れ...
-
【関数】先頭だけにある、半角...
-
エクセル 白黒印刷で白線を印刷...
-
Excelのチェックボックスの使い...
-
【関数】適切な文字数の数字を...
-
Excelのpivotについて質問です
-
Excel ピボットテーブルで日付...
-
LOOKUP関数を使えばいいのでし...
-
エクセル関数を教えてください
-
エクセルのセルに同じ大きさの...
-
UNIQUE関数が使えないバージョ...
-
excelの不要な行の削除ができな...
-
エクセルで「-0.0」と表示さ...
-
時間によってファイル名が変わ...
-
WPS OFFICEでの縦書きについて
-
エクセルの関数について教えて...
-
Aというブックの1というシート...
-
【マクロ】シート名を取得する...
-
VBA Private Sub Worksheet_Cha...
-
VBA、Excelのworkbook.open に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
[関数得意な方]教えて下さい・...
-
Excelにてある膨大なデータを管...
-
[関数について]わかる方教えて...
-
Excel初心者です。 詳しい方、...
-
excelの不要な行の削除ができな...
-
エクセル関数に詳しい方教えて...
-
INDIRECTを使わず excelで複数...
-
[オートフィルタ]で抽出された...
-
エクセルの神よ、ご回答を! エ...
-
エクセル関数に詳しい方、教え...
-
各ページの1番上の表示について
-
Excelで写真のような表を作った...
-
エクセルで不等号記号(≠)が上に...
-
数学 Tan(θ)-1/Cos(θ)について...
-
Excel 2019 は、SPILL機能があ...
-
Excelで全角を半角にしたいので...
-
条件付き書式を教えてください
-
Excel フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報