Je možné vybrat ze skupiny dat pouze unikátní hodnoty?
Úlohu lze vyřešit více způsoby. Dobrým programátorským návykem však je používat v maximální míře vestavěné algoritmy Excelu. Ty jsou totiž odladěny a kompilovány v prostředí jazyka C+ a jsou tedy rámcově 10x rychlejší než příslušné postupy založené na VBA.
V našem případě využijeme objekt AdvancedFilter představující pokročilý filtr přístupný pomocí nabídky "Data" v uživatelské obrazovce Excelu, který umožňuje selekci unikátních hodnot v oblasti dat.
Sub FindUniqueValues(SourceRange As Range, TargetCell As Range)
'SourceRange - oblast dat, ve které hledáme unikátní hodnoty
'TargetCell - první buňka (levý horní roh) oblasti, do které kód zapíše nalezené unikátní hodnoty
SourceRange.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=TargetCell, Unique:=True
End Sub