Räikeässä artikkelissa haluaisimme antaa sinulle kaksi oikeaa tapaa muuttaa kirjanmerkin nimeä Word-asiakirjassa.
Pitkää Word-asiakirjaa laadittaessa kirjanmerkeistä ja ristiviittauksista voi tulla paras ystävä säästämällä meille paljon aikaa selittämällä sama asia uudelleen. Odottamaton ongelma voi kuitenkin esiintyä. Esimerkiksi, jos muutat kirjanmerkin nimeä ja päivität ristiviittaukset, epäonnistut varmasti ja lopetat viittausvirheillä, kuten alla:
Syynä on, että kun muutat kirjanmerkin nimeä, poistit vahingossa itse kirjanmerkin. Nyt näytämme sinulle kaksi tapaa ratkaista tämä ongelma.
Tapa 1: Muuta kirjanmerkin nimi ja päivitä ristiviitteet manuaalisesti
- Aloita napsauttamalla "Lisää"-välilehteä ja sitten "Kirjanmerkki"-painiketta "Linkit"-ryhmässä.
- Valitse seuraavaksi kohdekirjanmerkki napsauttamalla ja napsauta "Siirry".
- Näet kirjanmerkitekstit olevan valittuna siihen mennessä. Napsauta "Poista".
- Syötä sitten uusi kirjanmerkin nimi ja napsauta "Lisää".
- Paina “Alt + F9” näyttääksesi kenttäkoodit.
- Jos sinulla on useita ristiviittauksia, suosittelemme käyttämään “Etsi ja korvaa” -toimintoa. Käynnistä Etsi ja korvaa -valintaikkuna painamalla vain "Ctrl + H".
- Kirjoita nyt ”Etsi mitä” -tekstikenttään ”REF DWORDR” ja ”Korvaa” -kenttään ”REF DWORDR2”. "DWORDR" on alkuperäinen kirjanmerkin nimi ja "DWORDR2" on uusi.
- Napsauta sitten “Korvaa kaikki”.
- Sulje Etsi ja korvaa -ruutu ja paina "Alt + F9" näyttääksesi viitteen sisällön uudelleen.
- Päivitä sitten asiakirjan kaikki kentät painamalla "Ctrl + A" ja "F9".
Kun siirrät kohdistimen ristiviittauksen päälle, näet uuden kirjanmerkin nimen ruudun kärjessä.
Tapa 2: Vaihda kirjanmerkin nimi ja päivitä ristiviittaukset VBA: n kautta
- Ensinnäkin paina “Alt + F11” käynnistääksesi VBA-editorin.
- Mene "Normaali" -projektiin lisätäksesi uuden moduulin napsauttamalla ensin "Lisää" -välilehteä.
- Valitse sitten avattavasta valikosta ”Moduuli”.
- Kaksoisnapsauta äskettäin luotua moduulia avataksesi muokkaustilan oikealla puolella.
- Liitä seuraava makro seuraavaksi:
Sub ChangeTheBookMarkNameAndUpdateCrossReference()
Dim strBookMarkName As String
Dim strNewName As String
Dim objBookMarkRange As Range
Dim objField As Field
Dim strFieldCode As String
' Rename the bookmark name.
strBookMarkName = InputBox("Enter the bookmark name which you want to change", "BookMark Name", "For example: DWORDR")
strNewName = InputBox("Enter the New bookmark Name", "New Bookmark Name", "For example: New text")
With ActiveDocument
If .Bookmarks.Exists(strBookMarkName) Then
Set objBookMarkRange = .Bookmarks(strBookMarkName).Range
.Bookmarks(strBookMarkName).Delete
.Bookmarks.Add Name:=strNewName, Range:=objBookMarkRange
' Update the cross-reference
If .Fields.Count >= 1 Then
For Each objField In .Fields
strFieldCode = objField.Code.Text
If strFieldCode = " REF " & strBookMarkName & " \h " Then
objField.Code.Text = Replace(strFieldCode, strBookMarkName, strNewName, , 1, vbTextCompare)
objField.Update
MsgBox ("Code = " & objField.Code & vbCr & "Result = " & objField.Result & vbCr)
End If
Next objField
End If
Else
MsgBox ("The Bookmark: " & strBookMarkName & " is not founded.")
End If
End With
Set objBookMarkRange = Nothing
End Sub
- Napsauta "Suorita" tai paina "F5".
- Kirjoita nyt alkuperäisen kirjanmerkin nimi ensimmäiseen ponnahdusikkunaan ja napsauta "OK".
- Kirjoita uusi nimi toiseen ja napsauta “OK”.
Viimeiseksi tulee ruutu, joka näyttää tuloksen.
Huolehdi Word-asiakirjoista
Kustannukset a vioittunut Word asiakirja ei rajoitu hämmästyttävään liiketoiminnan menetykseen, vaan myös saa ihmiset henkisesti järkyttyneiksi. Siksi on erittäin välttämätöntä toteuttaa ennalta ehkäiseviä toimenpiteitä epäonnisten ohittamiseksi, kuten asiakirjojen varmuuskopiointi.
Tekijän esittely:
Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien xlsx-korjaus ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com










