Hinzufügen einer fehlenden schließenden Klammer (Microsoft Excel)
Terry hat eine riesige Liste von Namen in einem Excel-Arbeitsblatt. Einige sind nur die Namen, andere haben Wörter in Klammern hinter sich. Leider haben einige der Wörter in Klammern keine schließende Klammer und Terry muss die schließende Klammer manuell hinzufügen. Er fragt sich, ob es eine Möglichkeit gibt, eine Klammer mithilfe einer Platzhaltersuche hinzuzufügen und zu ersetzen.
Die kurze Antwort lautet, dass Sie dies nicht durch Suchen und Ersetzen tun können, weder durch Platzhalter noch durch reguläre Karten. Sie können jedoch eine Formel verwenden, um fehlende Klammern hinzuzufügen. Das Folgende ist nur ein Beispiel für die Art der Formel, die Sie verwenden können:
=IF(AND(NOT(ISERROR(SEARCH("[",A1))),NOT(RIGHT(A1,1)="]")),A1&"]",A1)
Der Trick besteht darin, zu überprüfen, ob die Zelle (in diesem Fall A1) eine linke Klammer enthält, und in diesem Fall nach der rechten Klammer zu suchen. Wenn die rechte Klammer nicht gefunden wird, fügen Sie eine an den Inhalt der Zelle an.
Hier ist eine weitere Variation des gleichen Formelthemas:
=IF(ISERROR(FIND("[",A1)),A1,IF(ISERROR(FIND("]",A1)),A1&"]",A1))
Wenn Sie regelmäßig eine große Anzahl von Zellen auf fehlende Klammern überprüfen müssen, möchten Sie möglicherweise ein Makro erstellen, das einen Zellbereich untersucht und bei Bedarf eine rechte Klammer hinzufügt. Hier ist ein Beispiel, wie ein solches Makro formuliert werden könnte:
Sub Close_Bracket() Dim c As Range Const csLBrk As String = "[" Const csRBrk As String = "]" On Error Resume Next For Each c In Selection.Cells If InStr(1, c.Value, csLBrk) > 0 And _ InStr(1, c.Value, csRBrk) = 0 Then c.Value = c.Value & csRBrk End If Next c End Sub
Um das Makro zu verwenden, wählen Sie einfach den Zellenbereich aus, den Sie beeinflussen möchten, und führen Sie ihn dann aus. Die Zellen werden vor Ort untersucht und bei Bedarf modifiziert.
_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 (123) 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: