|
▼kanabun さん:
ありがとうございます!
案が浮かばず、マクロ作成が進まなかったので
すごく助かりました。
>▼かのか さん:
>
>>2列で重複しないデータを書き出したいのですが
>>方法が浮かびません。
>>
>>A B
>>111 顧客
>>111 知人
>>111 顧客
>>111 顧客
>>222 知人
>>333 顧客
>>333 知人
>>333 顧客
>
>フィルタオプションを使ってみてはどうでしょう?
>
>(例)
>1行目に見出し行を追加し、
>作業列に [C2] =A2&B2 でフィルダウンして A列とB列を結合したものを
>代入しておく。
>
>A B C
>Code Cat work
>111 顧客 111顧客
>111 知人 111知人
>111 顧客 111顧客
>111 知人 111知人
>222 顧客 222顧客
>333 知人 333知人
>333 顧客 333顧客
>333 知人 333知人
>
>出力先に、A列見出しとB列見出しだけ Copyしておいて、
>メニュ-[データ]-[フィルタ]-[フィルタオプションの設定]
> リスト範囲 [$A$1:$C$9]
> 抽出先 [A列見出しとB列見出しをCopyしたセル範囲 たとえば $H$1:$I$1]
> ■ 重複するレコードは無視する にチェックを入れ、
>[OK]
>
>これで、A、B列の重複しないリストが得られます。
>
>マクロの記録をとると、
> Range("A1:C9").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _
> "H1:I1"), Unique:=True
>
>の1行マクロとなります。
>
>抽出先(CopyToRange)を別シートにすることもできます。
|
|