I denne artikel vil vi oprette en brugerdefineret funktion til at beregne summen af cifre i en celle.
Eksempeldata for dette eksempel består af salgsdata. Hver agent har solgt forskellige produkter. I en celle har vi antal varer solgt efterfulgt af produktnavnet. Vi ønsker at finde den samlede vare, der sælges af hver agent.
Vi har oprettet “SumDigits” funktion til at beregne summen af cifre i cellen. Denne funktion tager celleområdet som input og returnerer summen af cifre i cellen.
Logisk forklaring
Vi har oprettet en brugerdefineret funktion "SumDigits" til at beregne summen af cifre i en celle. I denne funktion finder vi strengens længde i cellen og går derefter fra første tegn til det sidste tegn i strengen. Derefter finder vi og tilføjer de numeriske værdier, der findes i strengen for at få summen af cifre.
Kode forklaring
Midt (tal, i, 1)
Mid-funktion bruges til at udtrække understrengen fra hovedstrengen. Ovenstående kode vil udtrække et tegn fra hovedstrengen ad gangen.
IsNumeric (værdi)
IsNumeric -funktion bruges til at kontrollere, om den givne værdi er numerisk.
Val (værdi)
Val -funktion bruges til at konvertere strengen til numerisk værdi.
Følg venligst nedenstående for koden
Mulighed Eksplicit funktion SumDigits (tal som variant) Dim i som heltal for i = 1 til Len (tal) Hvis IsNumeric (Midt (tal, i, 1)) Så er SumDigits = SumDigits + Val (Midt (tal, i, 1)) Afslut hvis næste i Afslut funktion
Hvis du kunne lide denne blog, kan du dele den med dine venner på Facebook. Du kan også følge os på Twitter og Facebook.
Vi vil meget gerne høre fra dig, lad os vide, hvordan vi kan forbedre vores arbejde og gøre det bedre for dig. Skriv til os på e -mail -stedet