2 módszer a navigációs ablak megjelenítésére csak egy adott Word dokumentumban

Ebben a bejegyzésben kétféleképpen szeretnénk bemutatni a navigációs ablaktáblát egyetlen Word-dokumentumban.

Azok számára, akik sokat használják a navigációs ablaktáblát, észre kellett venniük, hogy az aktiválás után a jövőben minden megnyitott dokumentumnál megmarad. Így a bezáráshoz manuálisan kell kattintania a „Bezárás” gombra. Ez a globális funkció néha bosszantó lehet, különösen akkor, ha csak egy adott dokumentum számára szeretnénk megnyitni.

A probléma megoldásához szükségünk van a Word makró segítségére.

1. módszer: Makró a gyakori név- és elérési út változtatást igénylő dokumentumokhoz

1. Először is, mivel egy adott dokumentumban makrót kell futtatnunk, először a makróbeállítást kell módosítanunk. Kattintson a „Fájl”, majd az „Opciók” elemre a „Word Options” párbeszédpanel megnyitásához. Ezután kattintson a „Trust Center” és a „Trust Center Settings” gombra. Ezután kattintson a „Makróbeállítások” elemre, és válassza az „Összes makró engedélyezése” lehetőséget. Kattintson az „OK” gombra mindkét mezőben.
2. Most nyomja meg az „Alt+F11” gombot a VBA-szerkesztő megnyitásához.
3. Ezután kattintson a „ThisDocument” elemre az adott dokumentum projektje alatt.
4. Kattintson a „Beszúrás” fülre, és válassza a „Modul” lehetőséget.
5. Ezután kattintson duplán a modulra, és illessze be a következő kódokat a jobb oldali helyre:

Sub AutoOpen()
  ActiveWindow.DocumentMap = True
End Sub

Sub AutoClose()
  ActiveWindow.DocumentMap = False
End Sub

6. Kattintson a „Mentés” gombra.
7. Most lesz egy üzenetdoboz. Kattintson a „Nem” gombra.
8. A „Mentés másként” ablakban válassza a „Word Macro-Enabled Macro” lehetőséget a mentési típushoz.
9. Kattintson a „Mentés” gombra.

Most már csak az adott dokumentumhoz nyílik meg a navigációs ablak.

2. módszer: Szómakró rögzített névvel és elérési úttal rendelkező dokumentumokhoz

1. Kezdéshez nyissa meg a Wordöt, és nyomja meg az „Alt + F11” billentyűkombinációt a VBA szerkesztő elindításához.
2. A „Normál” projektben kattintson a „Beszúrás” gombra, és válassza a „Modul” lehetőséget.
3. Még mindig kattintson duplán a modulra a kódolási terület megnyitásához, és illessze be az alábbi makrót:

Sub AutoOpen()
  Dim strDocName As String
  Dim strDocpath As String
  Dim nDocName As Integer 
  Dim nDocpath As Integer 
 
  strDocName = "Sample.docx"
  strDocpath = "E:\Temp"
  '  If the two strings sort equally, Returns 0.
  nDocName = StrComp(ActiveDocument.Name, strDocName, vbTextCompare)
  nDocpath = StrComp(ActiveDocument.Path, strDocpath, vbTextCompare)
 
  If nDocName = 0 Then
    If nDocpath = 0 Then
      ActiveWindow.DocumentMap = True
    End If
  Else
    ActiveWindow.DocumentMap = False
  End If
End Sub

4. Ezután kattintson a „Mentés” gombra.

Megjegyzések:

1. A „strDocName = „Sample 2.docx” kódsorban cserélje ki a „Sample 2.docx” részt a fájlnévre.
2. A „strDocpath = „C:\Users\Public\Documents\New folder” kódsorban cserélje ki a „C:\Felhasználók\Nyilvános\Dokumentumok\Új mappát” a fájl tárolási helyének elérési útjára. Ne feledje, hogy a végén nincs „\”.

2 módszer összehasonlítása

Cím Word problémák

Napi használatunk során többé-kevésbé Word-hibákkal találkoztunk. A váratlan pedig minden előjel nélkül érkezik. Emiatt a hatások csökkentése érdekében docx sérülés, azt javasoljuk, hogy előtte tartson egy jól látható helyreállító eszközt.

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 korrupt Excel és a pdf javító szoftvertermékek. További információért látogasson el www.datanumen.com