Numărați valorile unice utilizând VBA în Microsoft Excel 2010

Cuprins

În acest articol, vom crea o funcție personalizată pentru a număra valorile unice din intervalul definit.

Datele brute pentru acest exemplu constau din numere aleatorii în rânduri. În acest exemplu, vrem să numărăm numărul de numere unice din fiecare rând.

Am creat funcția personalizată „CountUniqueValues” pentru a găsi numărul de numere unice din rând. Această funcție ia intervalul de intrare și returnează numărul unic de numere.

Explicație logică

Am creat funcția personalizată „CountUniqueValues” pentru a obține numărul de numere unice. În această funcție personalizată, am creat obiectul obiectului de colecție. Acest obiect de colecție este utilizat pentru a crea lista de numere unice. Odată ce avem lista numerelor unice, obținem numărul de articole din colecție.

Explicarea codului

Aplicație. Volatil este utilizat, deoarece se va recalcula de fiecare dată când se schimbă valoarea unei celule în registrul de lucru.

On Error Resume Next este utilizat pentru a gestiona erorile.

Vă rugăm să urmați codul de mai jos

 Opțiune Explicit funcție Număr Valori unice (intervalul de intrare ca interval) ca număr întreg dim Valoare celulară ca variantă, valori unice ca aplicație de colecție nouă. , CStr (CellValue) 'adăugați elementul unic Următorul' Returnarea numărului de valori unice CountUniqueValues ​​= UniqueValues.Count Funcția finală 

Dacă ți-a plăcut acest blog, distribuie-l prietenilor tăi de pe Facebook. De asemenea, ne puteți urmări pe Twitter și Facebook.

Ne-ar plăcea să aflăm de la dvs., să ne anunțați cum putem îmbunătăți munca noastră și o putem îmbunătăți. Scrieți-ne pe site-ul de e-mail

Vei ajuta la dezvoltarea site-ului, partajarea pagina cu prietenii

wave wave wave wave wave