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?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!