[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『日付の重複削除できない』(師走)
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
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.