Selles artiklis tahame teiega jagada 4 käepärast viisi, kuidas saada kiiresti ja õigesti oma Wordi dokumendis olevate piltide koguarv.
Aeg-ajalt vajab dokument mitut pilti, et muuta see professionaalsemaks. Kui aga olete minusugune mees, kes eelistab pilte kohe pärast redigeerimise lõpetamist sisestada, muretsete tõenäoliselt selle pärast, kas olete kogemata jätnud ühe või kaks. Järelikult peate dokumendis olevate piltide koguarvu kontrollimiseks hoolikalt üles ja alla kerima. Arvestades seda ebamugavust, pakume teile 4 tõeliselt kasulikku meetodit teie aja säästmiseks.
1. meetod: kasutage funktsiooni Otsi
- Esiteks ja kõige tähtsam on klõpsata vahekaardil „Avaleht”.
- Seejärel klõpsake ikooni „Leia” taga olevat nuppu.
- Ja valige menüüst "Täpsem otsing".
- Veenduge, et dialoogiboksis „Otsi ja asenda” ei oleks tekstikasti „Leia mis” muud teksti ja sisestage sinna „^g”.
- Järgmisena klõpsake nuppu "Otsi" ja valige "Põhidokument".
Nüüd on dialoogiboksis tulemus, mis näitab selles dokumendis olevate siseste kujundite arvu. See tähendab, et funktsioon „Otsi” saab loendada ainult pilte, mis on seatud ümbrislaadi „Koos tekstiga”.
2. meetod: kasutage funktsiooni „Mine”.
- Esiteks vajutage klahvikombinatsiooni Ctrl+Home, et minna dokumendi algusesse ja korrake 2. meetodi kahte esimest sammu.
- Seekord valige selle asemel "Mine".
- Seejärel valige "Graafika".
- Sisestage tekstiväljale midagi ja klõpsake nuppu "Järgmine".
Iga kord, kui klõpsate nupul "Järgmine", viib Word teid võrgugraafika juurde ja peate ise loendama. Siiski hõlmab see viis ainult sisemisi kujundeid.
Siin on video demonstratsioon:
3. meetod: vajutage klahvi "Tab".
- Alustamiseks klõpsake dokumendi esimesel pildil.
- Järgmisena vajutage "Tab" ja valitakse järgmine pilt. Ärge unustage ise arvutada.
Õnneks hõlmab meetod 3 nii tekstisiseseid kui ka ujuvaid kujundeid, näiteks tekstikaste.
4. meetod: käivitage Wordi makro
- Kõigepealt klõpsake vahekaarti "Arendaja".
- Seejärel klõpsake VBA redaktori avamiseks "Visual Basic".
- Järgmisena klõpsake nuppu "Insert" ja valige "Moodul", et lisada uus projekti "Tavaline" alla.
- Kodeerimisruumi avamiseks topeltklõpsake uuel moodulil.
- Ja kleepige sinna järgmised koodid:
Sub CountImages()
Dim objDoc As Document
Dim nFlowingShapes As Long, nInlineShapes As Long, nTextBox As Long, nTotalShapes As Long
Dim objShape As Shape
Set objDoc = ActiveDocument
nTextBox = 0
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
nTextBox = nTextBox + 1
End If
Next objShape
nFlowingShapes = objDoc.Shapes.Count
nInlineShapes = objDoc.InlineShapes.Count
nTotalShapes = nFlowingShapes + nInlineShapes - nTextBox
MsgBox "There are " & nTotalShapes & " images in this document, " & "with " & nFlowingShapes & " flowing shapes, " & nTextBox & "text boxes, and " & nInlineShapes & " inline shapes."
End Sub
- Lõpuks klõpsake nuppu „Käivita“.
Seal peab olema sõnumikast, mis näitab tulemust.
Tööriist Wordi parandamiseks
Word on vastuvõtlik vigadele ja vigadele. Ja kui see lakkab töötamast, võib sulgemine põhjustada meie Wordi failide kaost, mis on meile vaimselt tohutu tagasilöök. Sellegipoolest on katkiste failide tagasisaamiseks endiselt abinõu, milleks on keeruka tööriista hankimine paranda Word.
Autori sissejuhatus:
Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas xls remont ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom