Hoe controleert u of het eerste teken in een cel een letter of een cijfer is in Excel?
Bij het werken met grote datasets in Excel is het vaak handig om snel te bepalen of gegevensvermeldingen beginnen met een letter, een cijfer of een ander teken. Denk bijvoorbeeld aan lijsten met codes, adressen of gemengde vermeldingen waarin u de indeling wilt valideren of gegevens wilt categoriseren op basis van het eerste teken voor verdere verwerking. Hoewel Excel geen ingebouwde functie biedt voor deze specifieke controle, kunt u deze taak eenvoudig uitvoeren met formules — en in sommige gevallen met alternatieve methoden zoals VBA. De onderstaande methoden geven duidelijke stappen en praktisch advies om betrouwbaar het eerste teken van een cel te controleren.
Controleer met een formule of het eerste teken in een cel een letter of cijfer is
Alternatieve VBA-codeoplossing
Controleer met een formule of het eerste teken in een cel een letter of cijfer is
Met Excel-formules is het eenvoudig te bepalen of het eerste teken in een cel een letter, cijfer of iets anders is.
1. Selecteer een lege cel waarin u het resultaat wilt weergeven, voer de volgende formule in de formulebalk in en druk daarna op de Enter-toets om te bevestigen:
=IF(ISERR(LEFT(A2,1)*1),"letter","number")Deze formule controleert het eerste teken in cel A2. Als vermenigvuldiging met 1 een fout oplevert, is het teken geen cijfer – de formule retourneert dan „letter”. Anders retourneert ze „number”.
Tip: Zorg ervoor dat de formule verwijst naar de juiste cel. In de bovenstaande formule is A2 de cel met de waarde die u wilt controleren.
2. Nadat u de formule in de eerste cel hebt bevestigd, past u deze razendsnel toe op andere rijen: selecteer de resultaatcel en sleep de vulgreep omlaag om elke overeenkomstige cel in de kolom te controleren.
Uw resultaten tonen „letter” als het eerste teken een letter is en „number” als het een cijfer is, zoals hieronder is weergegeven:
Uitleg van parameters en praktische opmerkingen: De formule werkt goed met cellen die beginnen met standaard Latijnse letters of cijfers. Echter, voor elk teken dat niet naar een getal kan worden geconverteerd — waaronder sommige speciale tekens of Unicode-symbolen — kan deze „letter” retourneren. Als uw dataset vermeldingen bevat die met dergelijke tekens beginnen, is het veiliger om een nauwkeuriger detectieformule te gebruiken, zoals hieronder beschreven.
Als u verwacht dat cellen kunnen beginnen met leestekens, symbolen of andere niet-alfanumerieke tekens, gebruik dan deze verbeterde formule om resultaten in te delen als „Letter”, „Number” of „Other”:
=IF(A2="","",IF(AND(CODE(LEFT(A2,1))>=48,CODE(LEFT(A2,1))<=57),"Number",IF(OR(AND(CODE(LEFT(A2,1))>=65,CODE(LEFT(A2,1))<=90),AND(CODE(LEFT(A2,1))>=97,CODE(LEFT(A2,1))<=122)),"Letter","Other")))Deze formule controleert eerst of de cel leeg is. Zo niet, dan wordt de ASCII-waarde van het eerste teken gecontroleerd: cijfers hebben codes tussen 48 en 57, hoofdletters tussen 65 en 90, en kleine letters tussen 97 en 122. Alles buiten deze bereiken levert „Other” op.
Alternatieve VBA-codeoplossing
Voor geavanceerd gebruik, zoals batchbewerkingen of het integreren van tekencontroles in een aangepaste taak, kunt u een eenvoudige VBA-macro inzetten om automatisch het eerste teken van geselecteerde cellen te beoordelen en in te delen als „Letter”, „Number” of „Other”. Deze aanpak is perfect voor gebruikers met ervaring in macro’s die grote, herhalende taken willen stroomlijnen.
1. Open de VBA-editor door te klikken op Ontwikkelhulpmiddelen > Visual Basic. Klik in het nieuwe venster Microsoft Visual Basic for Applications dat verschijnt op Invoegen > Module en plak vervolgens de volgende code in de module:
Sub CheckFirstCharacterType()
Dim rng As Range
Dim cell As Range
Dim firstChar As String
Dim codeNum As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range to check", xTitleId, rng.Address, Type:=8)
For Each cell In rng
If cell.Value <> "" Then
firstChar = Left(cell.Value, 1)
codeNum = Asc(firstChar)
If codeNum >= 48 And codeNum <= 57 Then
cell.Offset(0, 1).Value = "Number"
ElseIf (codeNum >= 65 And codeNum <= 90) Or (codeNum >= 97 And codeNum <= 122) Then
cell.Offset(0, 1).Value = "Letter"
Else
cell.Offset(0, 1).Value = "Other"
End If
Else
cell.Offset(0, 1).Value = ""
End If
Next cell
End Sub2. Nadat u de code hebt geplakt, klikt u op de knop 
of drukt u op F5 om uit te voeren. Er verschijnt een prompt waarin u het bereik selecteert dat u wilt controleren. Zodra u bevestigt, analyseert de macro elke cel in uw selectie en toont het resultaat („Number”, „Letter” of „Other”) in de kolom direct rechts van uw gegevens.
Praktische tips: Als uw werkblad al formules of opmaak bevat in aangrenzende kolommen, pas dan desgewenst cell.Offset(0,1) aan om resultaten in een andere kolom weer te geven.
- Macro’s verwerken grote bereiken veel sneller dan het handmatig kopiëren van formules, waardoor potentiële fouten worden beperkt.
- Sla uw werkmap altijd op voordat u nieuwe VBA-code uitvoert om onbedoelde wijzigingen te voorkomen.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Gerelateerde artikelen:
- Hoe controleert u of een specifieke celnaam bestaat in Excel?
- Hoe controleert u of een celwaarde tussen twee waarden in Excel ligt?
- Hoe controleert u of een cel begint of eindigt met een bepaald teken in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins