Kan http://xxx.xx links autorettes til https://xxx.xx i word 2013

Anonym

Jeg har et Word 2013-dokument med et par hundrede links, og kun når man vil redigere et link, kan man se i linket, om der står http: eller https;

Spørgsmålet er, om man pr. automatik kan "opdatere" http:-links til https:-links.

Et tænkt eksempel: "Jeg har læst denne artikel xxxxxxxxxx i Politiken."

Låst spørgsmål. Dette spørgsmål blev migreret fra Microsoft Support-community'et. Du kan stemme om, hvorvidt det er nyttigt, men du kan ikke tilføje kommentarer eller svar eller følge spørgsmålet.

0 kommentarer

Svar accepteret af spørgsmålets forfatter

Anonym

Dette svar er blevet oversat automatisk. Som et resultat heraf, kan der være grammatiske fejl eller underlige vendinger.

Hej chrnielsen

Tak, fordi du skrev indlæg i Microsoft Community

Jeg forstår, at du i øjeblikket oplever et problem med Word automatisk opdatering af links

Med hensyn til dit problem hjalp jeg dig med at lave en test og fandt ud af, at denne handling kan udføres manuelt ved hjælp af funktionen "Erstat", der følger med Word.

For automatisk at opdatere alle http:-links til https:-links i et Word 2013-dokument, kan du bruge funktionen "Find og erstat". Her er de specifikke trin:

Det anbefales, at du sikkerhedskopierer filen, før du bruger den for at forhindre uventede situationer.

Åbn dit Word 2013-dokument.
Tryk på Ctrl + H for at åbne dialogboksen "Find og erstat".
Indtast http: i feltet "Find hvad".
Indtast https: i feltet "Erstat med".
Klik på "Erstat alle".

Dette vil erstatte alle http: i dokumentet med https:

En anden måde er at automatisere operationer gennem VBA-modulet i Word

Åbn dit Word 2013-dokument.
Tryk på Alt + F11 for at åbne Visual Basic Editor.
Højreklik på dit dokumentnavn (normalt ThisDocument), og vælg Indsæt -> Modul.
Kopiér og indsæt følgende kode i kodevinduet: Sub ReplaceHttpWithHttps() Dim rng As Range Set rng = ActiveDocument.Content rng.Find.ClearFormatting rng.Find.Replacement.ClearFormatting With rng.Find .Text = "http:" .Replacement.Text = "https:" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With rng.Find.Execute Replace:=wdReplaceAll End Sub
```
  5.Luk Visual Basic Editor. 

  6.Tryk på Alt + F8 for at åbne dialogboksen Makro, vælg makronavnet og klik på Kør.
```

Du er velkommen til at fortælle mig, hvis du har brug for yderligere hjælp, tak!

Oprigtige hilsner

Lele.X - MSFT | Microsoft Community Support Specialist

0 kommentarer

0 ekstra svar