[[20221202113059]] 『日付の重複削除できない』(師走) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) |

| 全文検索 | 過去ログ ]

 

『日付の重複削除できない』(師走)

C列に並んだ日付(10/14が4個、10/16が20個、10/20が50個)を重複削除するため、下記マクロを実行したところ最初の日付(10・14の4個)が残り、その他の日付は削除されてしまいました。
C列に各日付を1個だけ残すにはどのようにしたらよいか教えてください。

Sub 日付重複削除()

    '重複を削除
    Worksheets("Sheet2").Range("C1").CurrentRegion.RemoveDuplicates Columns:=1, Header:=xlYes

End Sub

< 使用 Excel:Office365、使用 OS:Windows10 >


 > Worksheets("Sheet2").Range("C1").CurrentRegion

 その範囲がどうなっているか、先ずはアドレスを確認してみてください。
 イメージ通りですか?

 多分
 ↓
 Sub 日付重複削除()
     '重複を削除
     With Worksheets("Sheet2").Range("C1")
         .Resize(.CurrentRegion.Rows.Count).RemoveDuplicates Columns:=1, Header:=xlYes
     End With
 End Sub

(半平太) 2022/12/02(金) 11:59:05


C列以降にだけ書かれているシートなら動作します
半平太さんの書かれている通り、A,B列にもデータがありCurrentRegionのColumns=1がA,B列になっているのではないでしょうか
(きら) 2022/12/02(金) 12:10:27

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.