Как переписать фрагмент макроса чтобы в коллекцию попадали только уникальные значения из столбца (а не все, как сейчас)
Код |
---|
On Error Resume Next For Each myCell In myRange If CStr(myCell) Like "*/*" Or CStr(myCell) Like "*-*" Then myCollection.Add Replace(CStr(myCell), "/", "-") End If Next myCell On Error GoTo 0 |