Hogyan lehet eltávolítani a szegélyt az Excel szövegmezőjéből?
Alapértelmezés szerint a szövegdobozt fekete szegélyek veszik körül az Excelben. Ha el akarja távolítani a szegélyt a szövegmezőből, hogyan teheti meg? És hogyan lehet eltávolítani a szegélyeket egy munkalap összes szövegmezőjéből, vagy létrehozni egy szegély nélküli szövegdobozt az Excelben? Ez a cikk bemutatja a problémák megoldásának módszereit.
Távolítsa el a szegélyt az Excel szövegmezőjéből
Távolítsa el a szegélyt az Excel jelenlegi munkalapjának összes szövegmezőjéből
Hozzon létre szegély nélküli szövegdobozt az Excelben
Távolítsa el a szegélyt az Excel szövegmezőjéből
Könnyű eltávolítani a szegélyt az Excel szövegmezőjéből az Excel Vázlat nélküli funkciójával. Kérjük, tegye a következőket.
1. Jelölje ki azt a mezőt, amelyből eltávolítja a szegélyeket.
2. kettyenés kialakított > Kép alakzat > Nincs vázlat. Lásd a képernyőképet:
Ekkor láthatja, hogy a határok azonnal eltávolításra kerülnek a kijelölt szövegmezőből, ahogy az alábbi képernyőképen látható.
Távolítsa el a szegélyeket az Excel jelenlegi munkalapjának összes szövegmezőjéből
Az alábbi VBA-kód segíthet eltávolítani a szegélyeket az Excel jelenlegi munkalapjának összes szövegmezőjéből. Kérjük, tegye a következőket.
1. A munkalap több szövegmezőt tartalmaz, amelyekből eltávolítja a szegélyeket, nyomja meg a gombot más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja a VBA kód alatt a kód ablakba.
VBA kód: távolítsa el a szegélyeket az aktuális munkalap összes szövegmezőjéből
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. megnyomni a F5 gombot a kód futtatásához. Ezután a határokat azonnal eltávolítja az aktuális munkalap összes szövegmezőjéből.
Hozzon létre szegély nélküli szövegdobozt az Excelben
Ellenkező esetben létrehozhat egy szegély nélküli szövegdobozt, hogy elkerülje a szegélyek eltávolítását a szövegmezőből. Kérjük, tegye a következőket.
1. A munkalapba beilleszt egy szegély nélküli szövegdobozt, nyomja meg a gombot más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja a VBA kód alatt a kód ablakba.
VBA kód: ne hozzon létre szegély szövegdobozt az Excelben
Sub AddTextbox_NoLine()
'Update by Extendoffice 2018/5/15
ActiveSheet.Shapes.AddTextbox( _
msoTextOrientationHorizontal, 90, 90, 180, 180).Line.Visible = msoFalse
End Sub
3. megnyomni a F5 gombot a kód futtatásához.
Ezután a szegély nélküli szövegdobozt azonnal beilleszti az aktuális munkalapba.
Kapcsolódó cikkek:
- Hogyan lehet megszámolni, ha a cella szöveget vagy annak egy részét tartalmazza az Excelben?
- Hogyan ellenőrizhető, hogy a cella értéke két érték között van-e az Excelben?
- Hogyan lehet összegezni a szomszédos cellát, egyenlő, üres vagy szöveget tartalmaz az Excelben?
- Hogyan adhatjuk vissza az értéket egy másik cellában, ha egy cella bizonyos szöveget tartalmaz az Excelben?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!