Следующий протестированный и рабочий код удалит дубликаты из массива. Необходимо включать Систему. Пространство имен наборов.
string[] sArray = {"a", "b", "b", "c", "c", "d", "e", "f", "f"};
var sList = new ArrayList();
for (int i = 0; i < sArray.Length; i++) {
if (sList.Contains(sArray[i]) == false) {
sList.Add(sArray[i]);
}
}
var sNew = sList.ToArray();
for (int i = 0; i < sNew.Length; i++) {
Console.Write(sNew[i]);
}
Вы могли обернуть это в функцию, если бы Вы хотели.
Попробуйте этот код в качестве примера. Ключевая строка: « Application.CutCopyMode = False »
Sub Test()
Range("A1").Copy
MsgBox "View Marching Ants"
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub