Propriedade CellFormat.Borders (Excel)

Retorna ou define uma coleção Borders que representa os critérios de pesquisa com base no formato de borda da célula.

Sintaxe

expressão. Fronteiras

Expressão Uma variável que representa um objeto CellFormat .

Exemplo

Este exemplo define os critérios de pesquisa para identificar as bordas das células que têm uma extremidade inferior com estilo espesso e contínuo, cria uma célula com essa condição, localiza-a e notifica o usuário.

Observação

A cor padrão da borda é usada neste exemplo; Portanto, o índice de cores não é alterado.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.