Cum se elimină chenarul din caseta de text din Excel?

În mod implicit, caseta de text este înconjurată de chenare negre în Excel. Dacă doriți să eliminați chenarul dintr-o casetă de text, cum ați putea face? Și cum să eliminați marginile din toate casetele de text dintr-o foaie de lucru sau să creați o casetă de text fără margine în Excel? Acest articol va introduce metode pentru a vă ajuta să rezolvați problemele.

Eliminați chenarul dintr-o casetă de text din Excel
Eliminați marginea din toate casetele de text din foaia de lucru curentă în Excel
Creați o casetă de text fără margini în Excel

---

Eliminați chenarul dintr-o casetă de text din Excel

Este ușor să eliminați chenarul dintr-o casetă de text din Excel cu caracteristica Fără contur în Excel. Vă rugăm să faceți următoarele.

1. Selectați caseta de text din care veți elimina chenarele.

2. clic Format > Shape Outline > Nu schiță. Vedeți captura de ecran:

Apoi, puteți vedea că marginile sunt eliminate din caseta de text selectată imediat, după cum se arată în imaginea de mai jos.

---

Eliminați marginile din toate casetele de text din foaia de lucru curentă în Excel

Codul VBA de mai jos vă poate ajuta să eliminați marginile din toate casetele de text din foaia de lucru curentă în Excel. Vă rugăm să faceți următoarele.

1. În foaia de lucru conține mai multe casete de text din care veți elimina chenarele, apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra codului.

Cod VBA: eliminați chenarele din toate casetele de text din foaia de lucru curentă

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. apasă pe F5 tasta pentru a rula codul. Apoi, marginile sunt eliminate imediat din toate casetele de text din foaia de lucru curentă.

---

Creați o casetă de text fără margini în Excel

În caz contrar, puteți crea o casetă de text fără margini pentru a evita eliminarea chenarelor din caseta de text. Vă rugăm să faceți următoarele.

1. În foaia de lucru veți introduce o casetă de text fără margine, apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra codului.

Cod VBA: nu creați casetă text de margine în Excel

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

3. apasă pe F5 tasta pentru a rula codul.

Apoi, caseta de text fără margini este inserată imediat în foaia de lucru curentă.

---

Legate de articole:

• Cum se numără dacă celula conține text sau o parte din text în Excel?
• Cum să verificați dacă o valoare a celulei este între două valori în Excel?
• Cum se sumif celula adiacentă este egală, goală sau conține text în Excel?
• Cum se returnează valoarea într-o altă celulă dacă o celulă conține un anumit text în Excel?