2 hitra načina iskanja Wordovih dokumentov z določenim številom strani

V današnjem članku vam želimo predstaviti 2 hitra načina iskanja Wordovih dokumentov z določenim številom strani.

Na splošno je v enem imeniku shranjenih veliko število datotek. Še več, lahko obstajajo različne vrste datotek. Torej, kaj, če morate iskati Wordove dokumente z določenim številom strani? Ali pa se zgodi, da ste pozabili ime dokumenta, vendar si zapomnite skupno število strani.

Naše spodnje rešitve vas bodo vodile do iskanja ciljnih Wordovih dokumentov z določenim številom strani.

1. način: Iskanje v Raziskovalcu

1. Najprej kliknite »Začni«.
2. Nato kliknite »Računalnik«, da odprete Windows Explorer. Če pa je ikona raziskovalca datotek že v opravilni vrstici, jo kliknite.
3. Nato pojdite na disk in določeno lokacijo, kjer hranite vse datoteke.
4. Zdaj z desnim klikom na prazen prostor v prvi vrstici.
5. Preverite »Vrsta« in »Strani«. Če tam niso vidni, kliknite »Več« na dnu menija.
6. V odprtem polju »Izberi podrobnosti« označite polja »Strani« in »Vrsta« in kliknite »V redu«.
7. Nato premaknite kazalec nad stolpec »Vrsta«, dokler se ne prikaže spustni gumb. Kliknite ga.
8. Potrdite polje »Microsoft Word Document«. Vidite, da so na voljo samo Wordovi dokumenti. Nato si oglejte stolpec »Strani«, da poiščete dokument z določenim številom strani.

2. način: zaženite Wordov makro

1. Najprej in predvsem pritisnite »Alt + F11«, da zaženete urejevalnik VBA v Wordu.
2. Nato kliknite »Normalno« in v orodni vrstici kliknite »Vstavi«.
3. Izberite »Modul«, da ustvarite novega.
4. Nato dvakrat kliknite, da odprete prostor za kodiranje na desni strani.
5. Tam prilepite naslednji makro:

Sub FindWordDocumentWithSpecificPageNumber()
  Dim lPageNumber As Long
  Dim lSpecificPageNumber As Long
  Dim strDocList As String
  Dim strDocName As String
  Dim objWordApplication As New Word.Application
  Dim strFile As String
  Dim strFolder As String

  strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
  lSpecificPageNumber = InputBox("Enter the page number you want to search", "Specific Page Number", "For example:1")
 
  strFile = Dir(strFolder & "*.doc*", vbNormal)
 
  While strFile <> ""
    With objWordApplication
      .Documents.Open (strFolder & strFile)
      lPageNumber = .ActiveDocument.ComputeStatistics(wdStatisticPages)

      If lPageNumber = lSpecificPageNumber Then
        strDocName = .ActiveDocument.FullName
        strDocList = strDocList & strDocName & vbCr 
      End If
 
      .ActiveDocument.Close
    End With
    strFile = Dir()
  wend
  Set objWordApplication = Nothing
 
  If strDocList <> "" Then
    Documents.Add Template:="Normal"
    ActiveDocument.Range.Text = strDocList
  Else
    MsgBox ("There is no match document.")
  End If
End Sub

6. Nato kliknite gumb "Zaženi" ali pritisnite "F5".
7. Zdaj se prikaže vnosno polje. Vnesite naslov mape v besedilno polje in ne pozabite dodati »\« na koncu niza.
8. Kliknite »V redu«, da se premaknete na naslednji korak.
9. V drugo polje vnesite številko. Številka označuje skupno število strani ciljnega dokumenta. Podobno kliknite »V redu«.

V Wordu bo odprt dokument s polnim imenom ciljnega dokumenta.

Obravnavajte stisko propadanja besed

Na splošno je Word mogočno orodje za obdelavo vsakodnevnega dela. Toda tu in tam se lahko pojavijo težave in težavna vprašanja. In včasih je situacija nekoliko huda, da se lahko končate poškodovana beseda. V takem primeru boste potrebovali napredno orodje za popravilo, da obnovite svoje delo.

Uvod avtorja:

Vera Chen je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z xls popravilo in pdf popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com