Chris hat eine große Anzahl von Zellen, die Teilenummern enthalten. Diese Zellen können in beliebiger Kombination entweder Ziffern oder Zeichen enthalten. Sie können auch Sonderzeichen wie Bindestriche, Schrägstriche und Leerzeichen enthalten.

Chris muss herausfinden können, ob eine Zelle nur Ziffern enthält, ohne die Sonderzeichen zu berücksichtigen. Somit würde eine Zelle, die 123-45 enthält, nur Ziffern enthalten, 123AB-45 nicht.

Der einfachste Weg, um herauszufinden, ob eine bestimmte Zelle nur die zulässigen Zeichen und Ziffern enthält, besteht darin, eine Formel zu verwenden, die die zulässigen Zeichen ohne Ziffern entfernt und dann überprüft, ob der resultierende Wert numerisch ist. Alle folgenden Formeln können den Trick ganz gut machen:

=IF(IFERROR(INT(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"-", ""),"/", "")," ", "")),FALSE), TRUE, FALSE)

=OR(ISNUMBER(SUBSTITUTE(A1,"-","")+0),ISNUMBER(SUBSTITUTE(A1,"/","")+0),ISNUMBER(SUBSTITUTE(A1," ","")+0))

=ISNUMBER(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1," ",""),"/",""),"-","")*1)

Sie können auch ein einfaches Makro verwenden, um herauszufinden, ob eine Zelle nur Ziffern und Ihre zulässigen Zeichen enthält. Es gibt zwar eine Reihe von Möglichkeiten, wie ein solches Makro angegangen werden kann, aber hier ist eine ziemlich einfache Methode:

Function DigitsOnly(sRaw As String) As Boolean     Dim X As Integer     Const sAllowed As String = "0123456789 -/"



Application.Volatile     For X = 1 To Len(sRaw)

If InStr(sAllowed, Mid(sRaw, X, 1)) = 0 Then Exit For     Next X     DigitsOnly = False     If X > Len(sRaw) Then DigitsOnly = True End Function

Das Makro untersucht alles, was an es übergeben wird, und vergleicht jedes Zeichen in der Zeichenfolge mit einer Liste zulässiger Zeichen (in der Konstante sAllowed).

Wenn ein nicht zugelassenes Zeichen erkannt wird, wird die Schleife vorzeitig beendet und ein falscher Wert zurückgegeben. Wenn Sie also die Zelle bei A1 auswerten möchten, können Sie in Ihrem Makro Folgendes verwenden:

=DigitsOnly(A1)

Da sie entweder True- oder False-Werte zurückgeben, kann jeder dieser Ansätze (Formel oder benutzerdefinierte Funktion) in Verbindung mit der bedingten Formatierung verwendet werden, um Formatierungsänderungen an Ihren Teilenummern vorzunehmen.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (12654) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365.