Hur man räknar bokstäver och siffror med hjälp av ett makro
Du kan använda funktionen "Redigera - Sök" för att söka efter specifika texter, siffror, bokstäver och sekvensnummer. Du kan också använda ett makro för att söka efter tecken i dina tabeller.
Följande makro frågar användaren efter ett innehåll och söker efter detta innehåll i det tidigare valda cellområdet. Så välj först ett område i tabellen och aktivera sedan följande makro:
Sub Counting Characters ()
Dim i As Long
Dim Position Så länge
Dim tecken som sträng
Dim Cell As Range
Dim a As String
Character = InputBox ("Vilket tecken vill du räkna?")
jag = 0
För varje cell i urval
Position = InStr (1, UCase (Cell.Value), UCase (tecken))
Medan position 0
i = i + 1
Position = InStr (Position + Len (Character), Cell.Value, Character)
Wend
Nästa cell
a = MsgBox ("Strängen" & tecken & "blev" _
& i & "Hittade tider.", vbOKOnly, "Sökresultat")
Avsluta Sub
I det första steget frågar makrot i ett fönster vilket tecken du vill söka efter i det markerade området:
Därefter söks cellintervallet. Ett resultatfönster visar hur ofta karaktären du letade efter hittades:
Sökningen är skiftlägeskänslig. Du kan också söka efter strängar som är längre än en bokstav eller siffra. Förutom bokstäver kan du också söka efter siffror eller kombinationer av bokstäver och siffror.
Tips: Om du vill veta hur du anger och startar makron i Excel hittar du en kort beskrivning här: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- i-excel-ein.html
