Ebben a post, 4 gyors módszert mutatunk be, amellyel eltávolíthatja a nem kívánt kereteket a Word-dokumentumból.
Bizonyos mértékig a kereteknek teljesen ugyanolyanoknak kell lenniük, mint a szövegdobozoknak, mindkettőt arra szokták, hogy szövegeket tároljanak egy dokumentumban. De a kereteknek van néhány előnye a szövegdobozokkal szemben. Például tartalmazhat néhány mezőt, és start lábjegyzetek vagy végjegyzetek belül, amelyek közül bármelyik szövegdobozban működik.
Ennek ellenére nem hagyhatjuk figyelmen kívül a már nem kívánt keretek eltávolításának szükségességét. Ezért kínálunk Önnek 4 egyszerű, de gyors módszert az alábbiak szerint:
1. módszer: Távolítsa el a kereteket manuálisan
- Először kattintson jobb gombbal a keret keretére.
- Ezután válassza a „Keret formázása” lehetőséget a helyi menüben.
- Ezután a „Keret” mezőben kattintson a „Keret eltávolítása” fülre.
2. módszer: Távolítsa el az összes keretet a kijelölésből
Amint látja, unalmas több képkockát egyenként eltávolítani az 1. módszer lépéseivel. Időmegtakarítás érdekében gyorsabb megoldás lenne a VBA-kódok használata.
- Először is válasszon ki egy sor keretet tartalmazó szöveget.
- Másodszor, nyomja meg az „Alt+F11” gombot a VBA-szerkesztő megnyitásához.
- Ezután kattintson a „Normál” projektre, majd a „Beszúrás” gombra.
- A legördülő menüben válassza a „Modul” lehetőséget.
- Nyissa meg a modult dupla kattintással, és illessze be a következő kódokat:
Sub RemoveAllFramesInSelection() Dim objFrame Keretként Dim nFrame As Long Application.ScreenUpdating = Hamis nFrame = Selection.Frames.Count Minden egyes objFrame-hez Selection.Frames-ben objFrame.Delete Következő objFrame MsgBox ("Minden " & nsFrame-ban van keret eltávolítva!") Application.ScreenUpdating = True End Sub
- Végül kattintson a „Futtatás” gombra, vagy nyomja meg az „F5” gombot a kódok végrehajtásához.
Üzenetdobozt fog kapni, amely jelzi az eredményt, például az alábbiak szerint:
3. módszer: Távolítsa el az összes keretet az aktuális dokumentumból
Ennek ellenére szükségünk lesz egy makróra a kötegelt feldolgozáshoz.
- Telepítsen és futtasson egy makrót a 2. módszer lépéseivel.
- Ezután cserélje ki a makrót erre:
All eltávolítva!") Application.ScreenUpdating = True End Sub
Hasonlóképpen, a folyamat befejeztével egy üzenetdobozban kap értesítést.
4. módszer: Távolítsa el a több dokumentumban lévő összes keretet egy mappából
Abban az esetben, ha van egy köteg dokumentuma, amelyek mindegyike kereteket tartalmaz, makrót is biztosítunk a feladat elvégzéséhez.
- Illessze be és futtassa ezeket a kódokat a VBA modulban:
Sub RemoveAllFramesInAllDocsInFolder() Dim objDoc mint dokumentum Dim dlgFájl mint FileDialog Dim nFile As Integer Dim objFrame Keretként Dim nFrame As Long Set dlgFile = Application.FileDialog(msoFileFileckerSallowMlglePlgileDia. ect = Igaz Ha .Show = -1 then For nFile = 1 A következőhöz: dlgFile.SelectedItems.Count Documents.Open dlgFile.SelectedItems(nFile) Set objDoc = ActiveDocument nFrame = ActiveDocument.Frames.Count Minden egyes objektumkerethez az ActiveDocument.Frames objFrame.Delete Next objDocseCramee ObjDocseCrame sgBox " Nincs kiválasztva fájl! Kérjük, válasszon a target file." Exit Sub End If End With End Sub
- Most elindítja a „Tallózás” ablakot. Válassza ki tarszerezze be a dokumentumokat, és kattintson a „Megnyitás” gombra. Ezután másodperceken belül eltávolítja a kiválasztott dokumentumokból az összes keretet.
Az adatkatasztrófa leküzdése
Mondanunk sem kell, hogy az adatkatasztrófa egyáltalán nem szörnyű. Ez bizonyos mértékig karrierveszélyt is jelenthet. Ezért az adatok védelme és az adatvesztés utáni helyes lépések ismerete létfontosságú. Az egyik javasolt intézkedés az, hogy a docx javítás eszközt előre.
Szerző Bevezetés:
Vera Chen adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve xlsx javítás és a pdf javító szoftvertermékek. További információért látogasson el www.datanumen.com
Hé! Valaki a Myspace csoportomból megosztotta velünk ezt az oldalt, ezért eljöttem megnézni. Határozottan szeretem az információkat. Megjelölöm a könyvjelzőket, és tweetelni fogom ezt követőimnek! Fantasztikus blog és fantasztikus design és stílus.
Ez a szar weboldal lefordítja a kódot!
állítsa be a nyelvet angolra, majd másolja ki a VB kódot.
sajnos ez nem működött nekem a Word 365-nél. Valamiért eltávolította a formázást egyes stílusoknál. Kipróbáltam a kiválasztási és a dokumentum alapú szkripteket is.
I