Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

61615 / 76738

←次へ　｜　前へ→


	【19738】重複データを除きたい

アロエ - 04/11/16(火) 13:57 -


	引用なし

	パスワード

お世話になります。

シートWordにはこのようなデータがあります

　a　b　･･･
1 A　D
2 A　D
3 A　D
4 A　D
5 A　D
6 A　D
7　　A
8　　A
9　　A

上記からAdvacedFilterで重複データを除いたかたちで
シートFilterへコピーしたいのですが、結果こんなようになってしまいました

結果：
A　D　･･･
A　D
A　D
A　A
　 A
　 A

中途半端。。（^^;
どうしたら重複データを取り除くことができるのでしょうか？
AdvancedFilter以外にも方法があるのでしょうか？
宜しくお願いいたします

ThisWorkbook.Worksheets("Word").Range("A1:IV65536").AdvancedFilter _
　　Action:=xlFilterCopy, CopyToRange:=ThisWorkbook.Worksheets _　　　　　　　 ("Filter").Range("A1"), Unique:=True

0 hits

▼

【19738】重複データを除きたい アロエ 04/11/16(火) 13:57

≪