Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt eine Borders-Auflistung zurück, die die Suchkriterien basierend auf dem Rahmenformat der Zelle darstellt, oder legt sie fest.
Syntax
Ausdruck. Grenzen
Ausdruck Eine Variable, die ein CellFormat-Objekt darstellt.
Beispiel
In diesem Beispiel werden die Suchkriterien festgelegt, um die Rahmen von Zellen zu identifizieren, die einen durchgehenden, dicken unteren Rand haben. Desweiteren wird eine Zelle mit dieser Bedingung erstellt, die Zelle gesucht und der Benutzer benachrichtigt.
Hinweis
In diesem Beispiel wird die Standardfarbe des Rahmens verwendet. Daher wird der Farbindex nicht geändert.
Sub SearchCellFormat()
' Set the search criteria for the border of the cell format.
With Application.FindFormat.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThick
End With
' Create a continuous thick bottom-edge border for cell A5.
Range("A5").Select
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThick
End With
Range("A1").Select
MsgBox "Cell A5 has a continuous thick bottom-edge border"
' Find the cells based on the search criteria.
Cells.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=True).Activate
MsgBox "Microsoft Excel has found this cell matching the search criteria."
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.