and the VBA didnt work as well
Hoe verwyder jy alle tekskassies in Word?
Teks bokse bied gebruikers 'n maklike manier om blokke van teks in dokumente te bestuur. Maar hoe om dit te verwyder wanneer jy 'n dokument formateer. Hierdie handleiding sal jou verskeie maniere wys om van alle tekskassies uit Word-dokument ontslae te raak.
Verwyder alle tekskassies een vir een handmatig
Verwyder alle tekskassies met VBA-kode
Maklik verwyder alle tekskassies sonder om teks met Kutools vir Word te verwyder
Maklik verwyder alle tekskassies met of sonder die verwydering van teks uit Word-dokument:
Met die Verwyder alle tekskassies nut van Kutools for Word, kan jy vinnig alle tekskassies uit die huidige dokument verwyder met of sonder hul teksinhoud soos hieronder aangedui.
Kutools for Word: met meer as 100 handige Word-invoegtoepassings, kan u sonder beperking in 30 dae probeer. Laai en gratis toets nou!
Office Tab: Aktiveer Tabbed redigering en blaai in Office, Net soos Chrome, Firefox, IE 8 / 9 / 10.
Classic Menu for Office: Bring ou blik van kantoor 2003 terug na Office 2007, 2010, 2013, 2016 en 2019.
Verwyder alle tekskassies een vir een handmatig
As daar net een of twee tekskassies is wat jy wil verwyder, kan jy soos volg doen:
Stap 1: Klik binne-in die tekskassie en druk Ctrl + C Om die teks te kopieer (slaan hierdie stap oor as jy nie die teks wil hou nie).
Stap 2: Klik op die rand van die tekskassie, druk verwyder.
Stap 3: Herhaal stap 1 en stap 2 totdat al die ongewenste tekskassies verwyder word.
Verwyder alle tekskassies met VBA-kode
Terwyl daar te veel tekskassies is wat jy wil verwyder, en jy nie die teks binne wil hou nie, sal VBA-kode baie nuttig wees. Gebruik asseblief VBA-kode om alle tekskassies in dokument soos volg te verwyder:
1. Press Alt + F11 om die VBA-venster in Word oop te maak;
2. Klik module in Plaas oortjie, en voeg die VBA kode in module venster;
3. Klik Run knoppie om die VBA-kode toe te pas (of druk F5);
Die VBA-kode om alle tekskassies te verwyder sonder om teks te hou:
Sub Test() Dim oShp As Word.Shape Dim i As Long For i = ActiveDocument.Shapes.Count To 1 Step -1 Set oShp = ActiveDocument.Shapes(i) If oShp.Type = msoTextBox Then oShp.Delete End If Next i End Sub
nota: Hierdie VBA-kode kan slegs die tekskassies verwyder.
Maklik verwyder alle tekskassies met Kutools vir Word
U kan alle tekskassies verwyder, maar hou hulle inhoud of verwyder beide tekskassies en hul inhoud in dokument met Kutools for Word.
Kutools for Word : Met meer as 100 handige Word-invoegtoepassings, vry om sonder beperking in 30 dae te probeer.
1. Pas asseblief hierdie program toe deur te klik Kutools > meer > Verwyder alle tekskassies. Sien skermkiekie:
2. As jy net die tekskassies wil verwyder en die teks hou, gaan kyk asseblief Net verwyder teks boks, en hou die teks opsie in Verwyder alle tekskassies dialoog, en klik dan OK. As jy beide die tekskassie en die teks wil verwyder, maak dit asseblief uit.
3. Dan verskyn 'n dialoog om te vertel hoeveel tekstboksies suksesvol verwyder word. Klik asseblief op die OK-knoppie.
Dan kan jy alle tekskassies sien met of sonder inhoud van die dokument verwyder word. Sien skermkiekies:
tip: Nadat tekskassies uit dokument verwyder is, kan leë rye verskyn. Dan die Verwyder Leë Paragraaf Punte nut van Kutools for Word kan u help om alle leë rye uit die dokument op dieselfde tyd te verwyder. Klik asseblief Kutools > Emty Paras > Verwyder Leë Paragraaf Punte. Sien skermkiekie:
Dan word alle leë rye outomaties op dieselfde tyd uit die huidige documemt verwyder:
As jy 'n gratis toets van hierdie program wil hê, gaan asseblief na gratis aflaai van die sagteware Eerstens, en gaan dan die operasie volgens bogenoemde stappe toe.
Demo: Maklik verwyder alle tekskassies sonder om teks met Kutools vir Word te verwyder
Kutools for Word sluit meer as 100 kragtige funksies en gereedskap vir Microsoft Word in. Gratis om sonder beperking in 30 dae te probeer. Laai nou die gratis proeflopie af!
Kutools for Word
Meer as 100 Gevorderde funksies vir Word 2003, 2007, 2010, 2013, 2016 en 2019
Meer funksies | Gratis aflaai | Slegs $ 39.00 vir honderde funksies