Entfernen von Bindestrichen aus ISBN-Nummern (Microsoft Excel)
Ciaran arbeitet in einer Bibliothek und muss häufig mit langen Listen von ISBN-Nummern in Excel arbeiten. Die Zahlen müssen entweder 10 oder 13 Ziffern enthalten, können Bindestriche enthalten und führende Nullen haben. Er verwendet das Textformat für Zellen, die ISBNs enthalten, um sie als Textzeichenfolgen intakt zu halten. Für einige Zwecke müssen die Bindestriche in den ISBNs entfernt werden (er verwendet hierfür Suchen und Ersetzen), und hier beginnt das Problem.
0-241-95011-2 wird zu 241950112 (jetzt wird es auf 9 Stellen gesenkt), und schlimmer noch, 978-0-00-200784-9 wird zu 9,78E + 12 (wissenschaftliche Notation). Ciaran kann keine Möglichkeit finden, diese beiden Probleme zu umgehen, unabhängig davon, was er mit der Formatierung vor oder nach der Verwendung von Suchen und Ersetzen tut, um die Bindestriche zu entfernen.
Wenn Sie die Zellen bearbeiten, analysiert Excel den Zelleninhalt als Zahlen und nicht als Text. In diesem Fall besteht die beste Lösung darin, sicherzustellen, dass Ihrem Zellinhalt ein Apostroph vorangestellt ist, bevor Sie Suchen und Ersetzen ausführen, um die Striche zu entfernen.
Wenn Sie ein Arbeitsblatt haben, das viele ISBN-Nummern in Spalte A enthält, können Sie die Apostrophe mit einer Formel wie der folgenden hinzufügen:
= "'" & A1
Sie können dann die Ergebnisse der Formeln kopieren und dann mit Inhalte einfügen Werte wieder in Spalte A einfügen. Jeder Wert in Spalte A enthält dann den Apostroph. Wenn Sie später das Suchen und Ersetzen durchführen, sind die führenden Nullen weiterhin vorhanden und Sie erhalten keine Versuche zur wissenschaftlichen Notation.
Der Grund dafür ist, dass der Apostroph ein Indikator für Excel ist, dass der Zelleninhalt als Text behandelt werden sollte. Das Apostroph wird nicht im Arbeitsblatt angezeigt, ist jedoch Teil des Zelleninhalts, wie Sie anhand der Formelleiste erkennen können.
Ein anderer Ansatz besteht darin, mithilfe von Suchen und Ersetzen die Bindestriche zu umgehen. Verwenden Sie stattdessen die SUBSTITUTE-Funktion, um sie auf folgende Weise zu entfernen:
=SUBSTITUTE(A1,"-","")
Die Arbeitsblattfunktion SUBSTITUTE gibt einen Textwert zurück, sodass führende Nullen beibehalten werden und Excel nicht versucht, die Zahlen in ein numerisches Format zu konvertieren.
Wenn Sie die Bindestriche routinemäßig aus einem Bereich von Zellen entfernen müssen, die ISBNs enthalten, ist es möglicherweise besser, ein Makro für die Operation zu verwenden. Das folgende Makro funktioniert für alle Zellen, die Sie ausgewählt haben, bevor Sie es ausführen.
Sub RemoveDashes() Dim c As Variant, sISBN As String For Each c In Selection sISBN = Application.Substitute(c, "-", "") c.NumberFormat = "@" c.Value = "'" & sISBN Next End Sub
Grundsätzlich macht das Makro drei Dinge: Es entfernt die Bindestriche, formatiert die Zelle als Text und platziert die gestrippte ISBN mit einem Apostroph davor wieder in der Zelle.
_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 (9927) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier: