Как да премахнете границата от текстовото поле в Excel?

По подразбиране текстовите полета в Excel са заобиколени от черни граници. Ако искате да премахнете рамката от едно текстово поле, да премахнете границите от всички текстови полета в работен лист или да създадете текстово поле без рамка, това ръководство ще ви преведе през всеки метод стъпка по стъпка.

Премахнете границата от текстово поле в Excel
Премахнете рамката от всички текстови полета в текущия работен лист в Excel
Създайте текстово поле без граници в Excel

Премахнете границата от текстово поле в Excel

Лесно е да премахнете рамката от текстово поле в Excel с функцията No Outline в Excel. Моля, направете следното.

1. Изберете текстовото поле, от което ще премахнете границите.

2. кликване формат > Начертайте формата > Без очертание. Вижте екранна снимка:

След това можете да видите, че границите се премахват незабавно от избраното текстово поле, както е показано на екранната снимка по-долу.

Премахнете границите от всички текстови полета в текущия работен лист в Excel

Кодът VBA по-долу може да ви помогне да премахнете границите от всички текстови полета в текущия работен лист в Excel. Моля, направете следното.

1. В работния лист съдържа множество текстови полета, от които ще премахнете граници, натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. В Microsoft Visual Basic за приложения прозорец, кликнете Поставете > Модули. След това копирайте по-долу 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 за приложения прозорец.

2. В Microsoft Visual Basic за приложения прозорец, кликнете Поставете > Модули. След това копирайте по-долу 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?