Hoe gegevensvalidatie toepassen om alleen getallen toe te staan in Excel?

Om alleen getallen toe te staan in een bereik van cellen, biedt deze handleiding enkele methoden om u hierbij te helpen.

Gegevensvalidatie toepassen om alleen getallen toe te staan in Excel
VBA-code toepassen om alleen getallen toe te staan in Excel
Eenvoudig alleen getallen toestaan in een bereik van cellen met een geweldig hulpmiddel
Meer handleidingen voor Gegevensvalidatie...

Gegevensvalidatie toepassen om alleen getallen toe te staan in Excel

U kunt gegevensvalidatie gebruiken met een aangepaste formule om alleen getallen toe te staan in een bereik van cellen in Excel. Volg de onderstaande stappen.

1. Selecteer het bereik van cellen waarin u alleen getallen wilt toestaan.

2. Klik op Gegevens > Gegevensvalidatie > Gegevensvalidatie. Zie screenshot:

3. Configureer in het dialoogvenster Gegevensvalidatie de volgende handelingen:

• 3.1 Selecteer Aangepast uit de Keuzelijst Toestaan;
• 3.2 Kopieer de onderstaande formule naar het Formule-vak;
• =ISNUMBER(A2)
• 3.3 Klik op de knop OK.

Opmerking: In de formule is A2 de eerste cel van het geselecteerde bereik.

Vanaf nu kunnen er alleen getallen worden ingevoerd in het gespecificeerde bereik.

VBA-code toepassen om alleen getallen toe te staan in Excel

Daarnaast kunt u de onderstaande VBA-code gebruiken om alleen getallen toe te staan in een bereik van cellen.

1. Klik in het werkblad waarin u invoer wilt beperken met de rechtermuisknop op het tabblad van het blad en klik vervolgens op Weergave Code in het contextmenu.

2. Kopieer in het venster Microsoft Visual Basic for Applications de onderstaande VBA-code naar het Code-venster.

VBA-code: Alleen getallen toestaan in een bereik van cellen

Public mBol As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20191120
Dim xStrV As String
Dim xRg As Range
Dim xIRg As Range
Dim xFNum As Integer
On Error Resume Next
If Not mBol Then
Application.ScreenUpdating = False
Set xRg = Range("A2:A12")
If Not Intersect(xRg, Target) Is Nothing Then
    xStrV = Target.Value
    If Not IsNumeric(xStrV) Then
         mBol = True
        Target.Value = vbNullString
        MsgBox "Only numbers are allowed in this range", , "Kutools"
    End If
Application.ScreenUpdating = True
End If
Else
  mBol = False
End If
End Sub

Opmerking: In de code is A2:A12 het bereik van cellen waarin u alleen getallen wilt toestaan. Pas dit aan zoals nodig.

3. Druk op de toetsen Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten.

Vanaf nu kunnen er alleen getallen worden ingevoerd in het gespecificeerde bereik.

Eenvoudig alleen getallen toestaan in een bereik van cellen met een geweldig hulpmiddel

Als u een eenvoudigere methode wilt proberen, raden we u aan de functie Beperk invoer van Kutools voor Excel te gebruiken.

1. Selecteer het bereik van cellen waarin u alleen getallen wilt toestaan, klik op Kutools > Beperk invoer > Beperk invoer.

2. Configureer in het dialoogvenster Beperk invoer het volgende:

• 2.1 Vink de optie Alleen toestaan ​​om de volgende tekens in te voeren aan;
• 2.2 Voer 0123456789 in het tekstvak in;
• 2.3 Klik op de knop OK. Zie screenshot:

3. Klik op OK in het volgende pop-upvenster van Kutools voor Excel om verder te gaan.

Opmerking: Als er gegevensvalidatie bestaat in het geselecteerde bereik, verwijdert klikken op Ja deze validatie, of u kunt op Nee klikken om de bewerking te annuleren.

4. Er verschijnt nog een dialoogvenster van Kutools voor Excel om u eraan te herinneren welke getallen zijn toegestaan in het gespecificeerde bereik. Klik op OK om de instellingen te voltooien.

Vanaf nu zijn alleen getallen toegestaan in dit gespecificeerde bereik.

Gerelateerde artikelen