2024-04-03 重複削除 VBA hatena facebook Twitter Pocket Sub Sample() Range("A:C").RemoveDuplicates(Array(1, 2, 3))End Sub