Šodienas rakstā mēs vēlamies jums piedāvāt 2 ātrus veidus, kā meklēt Word dokumentus ar noteiktu lappušu skaitu.
Parasti vienā direktorijā ir saglabāts liels skaits failu. Turklāt faili var būt dažādi. Tātad, ko darīt, ja jums ir jāmeklē Word dokumenti ar noteiktu lapu skaitu? Vai arī jūs aizmirstat dokumenta nosaukumu, bet atceraties tā kopējo lapu skaitu.
Mūsu risinājumi liks jums meklēt tariegūt Word dokumentus ar noteiktu lapu skaitu.
1. metode: meklēšana Windows Explorer
- Pirmkārt, noklikšķiniet uz “Start ”.
- Pēc tam noklikšķiniet uz “Dators”, lai atvērtu Windows Explorer. Vai arī, ja failu pārlūka ikona jau atrodas uzdevumjoslā, vienkārši noklikšķiniet uz tās.
- Pēc tam dodieties uz disku un konkrēto vietu, kur glabājat visus failus.
- Tagad ar peles labo pogu noklikšķiniet uz tukšās vietas pirmajā rindā.
- Atzīmējiet “Type” un “Pages”. Ja tie tur nav redzami, izvēlnes apakšdaļā noklikšķiniet uz “Vairāk”.
- Atvērtajā lodziņā “Izvēlēties detaļas” atzīmējiet izvēles rūtiņas “Pages” un “Type” un noklikšķiniet uz “OK”.
- Pēc tam pārvietojiet kursoru virs kolonnas “Tips”, līdz tiek parādīta nolaižamā poga. Noklikšķiniet uz tā.
- Atzīmējiet izvēles rūtiņu “Microsoft Word dokuments”. Jūs varat redzēt, ka pieejami ir tikai Word dokumenti. Pēc tam skatiet sleju “Lapas”, lai atrastu dokumentu ar noteiktu lapu skaitu.
2. metode: palaidiet Word Macro
- Pirmkārt un galvenokārtost, nospiediet “Alt + F11”, lai programmā Word izsauktu VBA redaktoru.
- Pēc tam rīkjoslā noklikšķiniet uz “Normal” un noklikšķiniet uz “Insert”.
- Izvēlieties “Modulis”, lai izveidotu jaunu.
- Pēc tam veiciet dubultklikšķi, lai labajā pusē atvērtu kodēšanas vietu.
- Ielīmējiet tur šādu 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 = Input Address "" "Ievadiet mapi , "Piemēram: E: \ test word \ test \") lSpecificPageNumber = InputBox ("Ievadiet meklējamās lapas numuru", "Specifiskās lapas numurs", "Piemēram: 1") strFile = Dir (strFolder & " * .doc * ", vbNormal) Kaut arī strFile <>" "Ar objWordApplication .Documents.Open (strFolder & strFile) lPageNumber = .ActiveDocument.ComputeStatistics (wdStatisticPages) Ja lPageNumber = lSpecificPageNumber = strDocLockDocistralDocstrument_str.Document_string_documents & vbCr beigas Ja .ActiveDocument.Close End With strFile = Dir () wend Iestatiet objWordApplication = Nekas, ja strDocList <> "" Tad Documents.Add Template: = "Normal" ActiveDocument.Range.Text = strDocList Else MsgBox ("Nav spēles dokuments. ") Beigt, ja Beigt apakš
- Pēc tam noklikšķiniet uz pogas “Palaist” vai nospiediet “F5”.
- Tagad tiek parādīts ievades lodziņš. Ievadiet mapes adresi tekstlodziņā un neaizmirstiet virknes beigās pievienot “\”.
- Noklikšķiniet uz Labi, lai pārietu uz nākamo soli.
- Otrajā lodziņā tekstlodziņā ievadiet numuru. Cipars norāda kopējo tarsaņemt dokumentu. Līdzīgi noklikšķiniet uz “OK”.
Programmā Word tiks atvērts dokuments ar pilnu tarsaņemt dokumentu par to.
Risiniet vārdu sabrukuma likteni
Parasti Word ir varens rīks ikdienas darba apstrādei. Tomēr šad un tad var rasties problēmas un sarežģīti jautājumi. Dažreiz situācija ir mazliet smaga, ar kuru jūs varat nonākt sabojāts vārds. Šādā gadījumā jums būs nepieciešams uzlabots remonta rīks, lai izgūtu savu darbu.
Autora ievads:
Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp xls remonts un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar