Como remover a borda de uma caixa de texto no Excel?

Por padrão, as caixas de texto no Excel são cercadas por bordas pretas. Se você deseja remover a borda de uma única caixa de texto, remover as bordas de todas as caixas de texto em uma planilha ou criar uma caixa de texto sem borda, este guia mostrará cada método passo a passo.

Remover borda de uma caixa de texto no Excel
Remover borda de todas as caixas de texto na planilha atual no Excel
Criar uma caixa de texto sem borda no Excel

Remover borda de uma caixa de texto no Excel

É fácil remover a borda de uma caixa de texto no Excel com o recurso 'Sem Contorno' no Excel. Por favor, siga os passos abaixo.

1. Selecione a caixa de texto da qual você removerá as bordas.

2. Clique em Formatar > Contorno da Forma > Sem Contorno. Veja a captura de tela:

Então você pode ver que as bordas são removidas da caixa de texto selecionada imediatamente, conforme mostrado na captura de tela abaixo.

Remover bordas de todas as caixas de texto na planilha atual no Excel

O código VBA abaixo pode ajudá-lo a remover as bordas de todas as caixas de texto na planilha atual no Excel. Por favor, siga os passos abaixo.

1. Na planilha que contém várias caixas de texto das quais você removerá as bordas, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o código VBA abaixo na janela de código.

Código VBA: remover bordas de todas as caixas de texto na planilha atual

Sub DelectTextBoxLine()
'Update by Extendoffice 2018/5/15
    Dim xOle As Shape
    On Error GoTo LableNext
    For Each xOle In ActiveSheet.Shapes
        If xOle.Name Like "TextBox*" Then
            xOle.Line.Visible = msoFalse
        End If
LableNext:
    Next
End Sub

3. Pressione a tecla F5 para executar o código. As bordas serão removidas de todas as caixas de texto na planilha atual imediatamente.

Criar uma caixa de texto sem borda no Excel

Alternativamente, você pode criar uma caixa de texto sem borda para evitar a necessidade de remover as bordas de uma caixa de texto. Por favor, siga os passos abaixo.

1. Na planilha onde você inserirá uma caixa de texto sem borda, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o código VBA abaixo na janela de código.

Código VBA: criar caixa de texto sem borda no Excel

Sub AddTextbox_NoLine()
'Update by Extendoffice 2018/5/15
    ActiveSheet.Shapes.AddTextbox( _
        msoTextOrientationHorizontal, 90, 90, 180, 180).Line.Visible = msoFalse
End Sub

3. Pressione a tecla F5 para executar o código.

Uma caixa de texto sem bordas será inserida na planilha atual imediatamente.

Artigos relacionados:

• Como contar se a célula contém texto ou parte do texto no Excel?
• Como verificar se o valor de uma célula está entre dois valores no Excel?
• Como usar SOMASE quando a célula adjacente é igual, em branco ou contém texto no Excel?
• Como retornar o valor em outra célula se uma célula contiver determinado texto no Excel?