Jak usunąć wszystkie pola tekstowe w programie Word?

Pola tekstowe oferują użytkownikom łatwy sposób zarządzania blokami tekstu w dokumencie. Ale jak je usunąć podczas formatowania dokumentu. Ten samouczek pokaże Ci kilka sposobów na pozbycie się wszystkich pól tekstowych z dokumentu Word.

Ręcznie usuń kolejno wszystkie pola tekstowe
Usuń wszystkie pola tekstowe z kodem VBA
Z łatwością usuwaj wszystkie pola tekstowe bez usuwania tekstu za pomocą Kutools for Word

Ręcznie usuń kolejno wszystkie pola tekstowe

Jeśli chcesz usunąć tylko jedno lub dwa pola tekstowe, możesz wykonać następujące czynności:

Krok 1: Kliknij w polu tekstowym i naciśnij Ctrl + C aby skopiować tekst (pomiń ten krok, jeśli nie chcesz zachować tekstu).

Krok 2: Kliknij krawędź pola tekstowego, naciśnij Usuń.

Krok 3: Powtarzaj krok 1 i krok 2, aż wszystkie niepożądane pola tekstowe zostaną usunięte.

Usuń wszystkie pola tekstowe z kodem VBA

Chociaż jest zbyt wiele pól tekstowych, które chcesz usunąć, i nie chcesz też przechowywać tekstu w środku, kod VBA będzie bardzo pomocny. Użyj kodu VBA, aby usunąć wszystkie pola tekstowe w dokumencie w następujący sposób:

1. naciśnij Alt + F11 aby otworzyć okno VBA w programie Word;

2. kliknij Moduł in wstawka i wstaw kod VBA do Moduł okno;

3. kliknij run aby zastosować kod VBA (lub naciśnij F5);

Kod VBA do usuwania wszystkich pól tekstowych bez zachowywania tekstu:

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

Note: Ten kod VBA może usuwać tylko pola tekstowe rysunku.

Z łatwością usuń wszystkie pola tekstowe za pomocą Kutools for Word

Możesz usunąć wszystkie pola tekstowe, ale zachować ich zawartość lub usunąć oba pola tekstowe i ich zawartość w dokumencie za pomocą Kutools dla Worda.

Kutools dla Worda : Ponad 100 przydatnych dodatków do Worda, bezpłatnie wypróbować bez ograniczeń w ciągu 60 dni.

1. Proszę zastosować to narzędzie, klikając Kutools > Usunąć > Usuń wszystkie pola tekstowe. Zobacz zrzut ekranu:

2. Jeśli chcesz tylko usunąć pola tekstowe i zachować tekst, zaznacz Po prostu usuń tekst i zachowaj tekst opcja w Usuń wszystkie pola tekstowe kliknij OK. Jeśli chcesz usunąć zarówno pole tekstowe, jak i tekst, odznacz je.

3. Następnie pojawi się okno dialogowe z informacją, ile pól tekstowych zostało pomyślnie usuniętych, kliknij przycisk OK.

Następnie możesz zobaczyć, że wszystkie pola tekstowe z zawartością lub bez są usuwane z dokumentu. Zobacz zrzuty ekranu:

Wskazówka: Po usunięciu pól tekstowych z dokumentu mogą pojawić się puste wiersze. A później Usuń puste znaki akapitu użyteczność Kutools dla Worda może pomóc w usunięciu wszystkich pustych wierszy z dokumentu w tym samym czasie. Proszę kliknąć Kutools > Pusty Paras > Usuń puste znaki akapitu. Zobacz zrzut ekranu:

Następnie wszystkie puste wiersze są automatycznie usuwane z bieżącego dokumentu w tym samym czasie:

Jeśli chcesz skorzystać z bezpłatnej wersji próbnej tego narzędzia, przejdź do bezpłatnie pobrać oprogramowanie najpierw, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.