Slik bruker du Visual Basic for Applications til å telle forekomstene av et tegn i et merket område i Excel

Sammendrag

I Microsoft Excel kan du bruke en makro til å telle forekomstene av et bestemt tegn i en celle eller et celleområde. Denne artikkelen inneholder en eksempelmakro for å telle forekomstene av et bestemt tegn i en celle eller et celleområde.

Du kan også bruke en formel til å utføre oppgaven. Hvis du foretrekker å ikke bruke en makro, klikker du følgende artikkelnumre for å vise artiklene i Microsoft Knowledge Base:

187667 formler for å telle forekomstene av tekst, tegn eller ord i Excel for Mac

Mer informasjon

Microsoft gir programmeringseksempler kun for illustrasjon, uten garanti hverken uttrykt eller antydet. Dette inkluderer, men er ikke begrenset til, de underforståtte garantiene for salgbarhet eller egnethet for et bestemt formål. Denne artikkelen forutsetter at du er kjent med programmeringsspråket som blir demonstrert og verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsoft kundestøtte-teknikere kan hjelpe til å forklare funksjonaliteten til en bestemt prosedyre, men de vil ikke endre disse eksemplene for å gi ekstra funksjonalitet eller konstruere prosedyrer for å dekke dine spesifikke behov.

Eksempel på Visual Basic-prosedyre

Følgende Visual Basic-prosedyre ber deg om et tegn (eller tegn), søker deretter gjennom den merkede cellen eller celleområdet, og viser en meldingsboks som viser totalt antall forekomster av tegnet eller tegnstrengen. Dette fungerer for alle alfanumeriske tegn.

Dim Count As Integer
Dim Target As String
Dim Cell As Object
Dim N As Integer

Sub Target_Count()
   Count = 0
   Target = InputBox("character(s) to find?")
   If Target = "" Then GoTo Done
      For Each Cell In Selection
         N = InStr(1, cell.Value, target)
         While N <> 0
            Count = count + 1
            N = InStr(n + 1, cell.Value, target)
         Wend
      Next Cell
   MsgBox count & " Occurrences of " & target
Done:
End Sub