Kako izdvojiti nedostajuće vrijednosti putem VBA -a

Sadržaj

U ovom ćemo članku stvoriti korisnički definiranu funkciju kako bismo otkrili broj koji nedostaje u rasponu kroz VBA u programu Microsoft Excel.

Korisnički definirana funkcija: Microsoft Excel omogućuje vam stvaranje vlastite funkcije prema zahtjevu, nazivamo je korisnički definirana funkcija. Također možemo koristiti korisnički definirane funkcije kao i ostale funkcije koje rade u Excelu.

Uzmimo primjer za razumijevanje:-

Imamo podatke u kojima imamo vrijednosti za svaki ID koda i želimo provjeriti vrijednost koja nedostaje između 1 do 99, ako u rasponu nedostaju vrijednosti, koje vrijednosti sve nedostaju i ako su sve vrijednosti dostupne, rezultat bi trebao biti sve su vrijednosti dostupne.

Napisat ćemo VBA kôd kako bismo saznali nedostajuće brojeve slijedeći dolje navedene korake:

  • Otvorite VBA stranicu pritisnite tipku Alt+F11
  • Umetnite modul
  • Zatim idite na ponovno umetanje izbornika i kliknite postupak, gdje ćete dobiti postupak ako ne znate kako pokrenuti makro
  • Napišite dolje navedeni kod:
Funkcija Missing_Number (Myrange As Range) Dim Number (1 to 99) As Integer On Error Nastavi sljedeću za svaku ćeliju u Myrange Number (Cell.Value) = 1 Next On Error GoTo 0 Missing_Number = "Nedostaje:" Za I = 1 do 99 Ako nije Broj (I) = 1 Tada je Missing_Number = Missing_Number & I & "," End If Next I If Len (Missing_Number) = 9 Then Missing_Number = Left (Missing_Number, Len (Missing_Number) - 2) End If End Function 

  • Pritisnite tipku F5 na tipkovnici
  • Koristite ovu makro funkciju kao formulu
  • = Nedostajući_broj (D3: KO3) pritisnite enter na tipkovnici

Na taj način možemo vratiti vrijednosti koje nedostaju iz podataka za svaki redak pomoću VBA u programu Microsoft Excel

Ako vam se sviđaju naši blogovi, podijelite ih sa svojim prijateljima na Facebooku. Također nas možete pratiti na Twitteru i Facebooku.

Voljeli bismo čuti vaše mišljenje, javite nam kako možemo poboljšati, nadopuniti ili inovirati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte

Vi ćete pomoći u razvoju web stranice, dijeljenje stranicu sa svojim prijateljima

wave wave wave wave wave