如何從Excel中的文本框中刪除邊框？

默認情況下，文本框在Excel中被黑色邊框包圍。 如果要從文本框中刪除邊框，該怎麼辦？ 以及如何從工作表中的所有文本框中刪除邊框或在Excel中創建無邊框的文本框？ 本文將介紹幫助您解決問題的方法。

從Excel中的文本框中刪除邊框
從Excel當前工作表中的所有文本框中刪除邊框
在Excel中創建無邊框文本框

---

從Excel中的文本框中刪除邊框

使用Excel中的“無輪廓”功能很容易從Excel中的文本框中刪除邊框。 請執行以下操作。

1.選擇要從中刪除邊框的文本框。

2。 點擊 格式 > 形狀輪廓 > 沒有大綱。 看截圖：

然後您可以看到邊框立即從選定的文本框中刪除，如下圖所示。

---

從Excel當前工作表中的所有文本框中刪除邊框

下面的VBA代碼可以幫助您從Excel當前工作表中的所有文本框中刪除邊框。 請執行以下操作。

1.在工作表中包含多個文本框，您將從中刪除邊框，然後按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口中，單擊 插入 > 模塊。 然後將下面的VBA代碼複製到代碼窗口中。

VBA代碼：從當前工作表中的所有文本框中刪除邊框

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。 按 F5 鍵來運行代碼。 然後立即從當前工作表中的所有文本框中刪除邊框。

---

在Excel中創建無邊框文本框

否則，您可以創建一個無邊框文本框，以避免從文本框中刪除邊框。 請執行以下操作。

1.在工作表中，您將插入一個無邊框的文本框，然後按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口中，單擊 插入 > 模塊。 然後將下面的VBA代碼複製到代碼窗口中。

VBA代碼：在Excel中創建無邊框文本框

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

3。 按 F5 鍵來運行代碼。

然後，無邊界的文本框立即插入當前工作表中。

---

相關文章：

• 如何在Excel中計算單元格是否包含文本或部分文本？
• 如何檢查單元格值是否在Excel中的兩個值之間？
• 如何在Excel中求和相鄰單元格是否相等，為空白或包含文本？
• 如果一個單元格包含Excel中的某些文本，如何在另一個單元格中返回值？