No.1ベストアンサー
- 回答日時:
こんばんは
フィルタオプションでの操作例です
データ範囲がA1:B300まであるとして
A列 B列 C列 D列
1 data1 data2 data2
2 1052 1052 式
3 1230 1033
4 1335 1044
5 1560 1335
6 1650 1650
: : :
300 : :
式 セルD2に =COUNTIF($A$2:$A$300,B2)=0
・1行目に適当な項目名を記載
C1(抽出場所に抽出対象:B列 と同様の項目名を記載
・A1:B300までを選択
・メニューのデータ フィルタ フィルタオプション
抽出先 指定した範囲 にチェク
リスト範囲 $A$1:$B$300
検索条件範囲 $D$1:$D$2 ←D1は空白 D2が条件数式
抽出範囲 $C$1
で試してみて下さい
No.3
- 回答日時:
C1に=IF(ISERROR(MATCH(B1,$A$1:$A$310,0)),B1,"")
D1に=IF(ISERROR(MATCH(B1,$A$1:$A$310,0)),ROW(),"")
をいれB列最下行まで複写。A列データを310行と仮定。
B1:CXX(XXはB列最下行)を値のみ複写で値にする。
B1:CXXをD列で並べ替えする。
(サンプル)A1:B8。式は
=IF(ISERROR(MATCH(B1,$A$1:$A$8,0)),B1,"")
=IF(ISERROR(MATCH(B1,$A$1:$A$8,0)),ROW(),"")
10551033
10681053
10781078
10881099
10992000
20112002
20122011
20202013
(結果)C1:D5
10331
10532
20005
20026
20138
D列は消す。
No.2
- 回答日時:
以前の質問の時に、どのような回答を頂いたのか分かりませんので、
重複していたらすみません。
頑張って書いてる内に#1さんの回答が入っていたので、
必要なければ、読み飛ばしてください。
(やばいなー 読み飛ばされそう!)
でも、頑張って書いたので見れたら見てね。
一応、思いつくのを3つ挙げてみました。
何を持って簡単とするかは、gilfffoさん次第ですが、
お勧めは、VBAです。(早い!)私の回答の中ではです。
VBはよくわからないようですが、一応VBAの方法も記述しましたので、他と比べてみてください。
1.手動にて(面倒!)さらに#1さんの方が簡単そう!
(1)C1セルに
=IF(COUNTIF($A$1:$A$300,B1)=0,B1,"")
と入力しC300セルまでコピー
(2)C列全体をコピーし、C列に値のみ貼り付け
(3)「データ」→「並べ替え」で値を並べ替える
2.関数にて(必要行が増えると再計算に時間が掛かる!)
(1)C1セルに
=IF(SUM(IF((COUNTIF($A$1:$A$300,$B$1:$B$300)=0)*($B$1:$B$300),1,0))<ROW(A1),"",INDEX($B$1:$B$300,SMALL(IF(COUNTIF($A$1:$A$300,$B$1:$B$300)=0,ROW($B$1:$B$300),""),ROW(A1)),))
と入力し、[Enter]の代わりに[Ctrl]+[Shift]+[Enter]を押す
(2)必要行までコピー
3.VBAにて(若干の知識が必要!)
(1)[Alt]+[F11]でVisial Basic Editerに移動する。
(2)「挿入」→「標準モジュール」でモジュールを追加する。
(3)右上の広い場所([General]と書いてある下)に
以下のコードを貼り付ける。
'----------この下から--------
Sub test()
With Worksheets("Sheet1")
.Range("c:c").ClearContents
tbl = .Range("A1:C300").Value
cnt = 0
For i = 1 To UBound(tbl, 1)
If (tbl(i, 2) <> "") Then
flg = False
For j = 1 To UBound(tbl, 1)
If (tbl(j, 1) = tbl(i, 2)) Then
flg = True
Exit For
End If
Next j
If (flg = False) Then
cnt = cnt + 1
tbl(cnt, 3) = tbl(i, 2)
End If
End If
Next i
.Range("A1:C300").Value = tbl
End With
End Sub
'----------この上まで--------
(4)[Alt]+[F11]でEXCELに戻る
(5)「ツール」→「マクロ」→「マクロ」
から[Test]を選択して実行
(「フォーム」のツールバーからボタンを選択してマクロを登録してもよい。)
分からない所やおかしい所があれば、補足してください。
長文失礼しました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで2つの表を比較して、文字列が同じだが、その行のある値が違うものを抽出したい 1 2022/10/06 21:48
- Visual Basic(VBA) EXCEL VBAで教えてください。 1 2022/12/22 04:20
- Excel(エクセル) Excelの文字列を数字に変換する方法について 6 2023/07/31 21:18
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- Excel(エクセル) Excelに文字データのみを貼り付けたい 8 2023/05/03 15:38
- Excel(エクセル) エクセルで重複データから重複を削除して指定の列に抽出したい 11 2022/05/11 11:26
- Visual Basic(VBA) Excel VBAでAA(BBB) → BBB.AA に置換したい 2 2022/10/30 13:59
- Excel(エクセル) Excel 複数列のある文字を優先して1列に表示したいです 2 2022/12/03 12:07
- Visual Basic(VBA) VBAで、特定の文字より後を削除して残った数値を文字列に変換と特定の文字より前も削除したい 3 2022/04/15 19:21
- その他(プログラミング・Web制作) awkの文字列比較はPOSIXロケールまたはCロケールにおいてバイナリ値の比較に使えるか gawkな 1 2023/04/22 09:21
関連するカテゴリから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 フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報