[GastForen Programme Office Microsoft Office Word: alle Hyperlinks auf einmal löschen ?

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Office - Alles fürs Büro
Themen
Beiträge
Moderatoren
Letzter Beitrag

Word: alle Hyperlinks auf einmal löschen ?

rohrfrei
Beiträge gesamt: 4464

5. Dez 2005, 16:57
Beitrag # 1 von 5
Bewertung:
(3443 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,

ein Autor hat in seinem Word-Text externe Hyperlinks gesetzt. Das sind aber keine URLs, sondern Verweise auf seine interne Festplatte C. Keine Ahnung wie die da rein gekommen sind.

Beim Import in InDesign erscheinen jetzt diese Hyperlinks gesondert ausgezeichnet. In Word kann man jeden Hyperlink mit der rechten Maustaste anwählen und dann entfernen.

Leider geht das nicht für größere Textpassagen mit mehreren Hyperlinks gleichzeitig und eine globale Funktion alle Hyperlinks löschen habe ich nicht gefunden. Die Hilfe schweigt sich dazu ebenfalls aus.

Weiß jemand Rat?

Gruß
X

Word: alle Hyperlinks auf einmal löschen ?

peppi
Beiträge gesamt: 347

5. Dez 2005, 19:04
Beitrag # 2 von 5
Beitrag ID: #199265
Bewertung:
(3439 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,

mit nachfolgendem Makro kann man alle Hyperlinks im Dokumentteil (also außer Kopf-/Fußzeilen) löschen:

Sub AlleHyperlinksAufloesen()
Dim HL As Hyperlink
For i = ActiveDocument.Hyperlinks.Count To 1 Step -1
ActiveDocument.Hyperlinks(i).Delete
Next i
End Sub
_________________________________

Gruß peppi
(Windows XP Prof. / Office 2003)


als Antwort auf: [#199234]

Word: alle Hyperlinks auf einmal löschen ?

rohrfrei
Beiträge gesamt: 4464

6. Dez 2005, 08:45
Beitrag # 3 von 5
Beitrag ID: #199316
Bewertung:
(3430 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Peppi,

vielen Dank, das funzt so. Sehr gut.

Aber kann ich das auch dauerhaft speichern? Sorry, bin nun überhaupt nicht der Makro-Experte unter Win. Ich habe in Word den Visual-Basic-Editor aufgerufen und da in das geöffnete Dokument das Script per copy-and-paste eingefügt. Ausführen bei offenem Dokument klappt prima.

Aber wie kann ich das für andere Dokumente speichern? Der Export erzeugt eine Klassenbibliothek, die ich aber nicht in andere Word-Dokumente importieren oder ausführen kann. Ein Tip wäre sicherlich nochmal hilfreich.

Gruß


als Antwort auf: [#199265]

Word: alle Hyperlinks auf einmal löschen ?

peppi
Beiträge gesamt: 347

6. Dez 2005, 09:16
Beitrag # 4 von 5
Beitrag ID: #199321
Bewertung:
(3425 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,

wenn Du dieses Makro in der Normal.dot speicherst, steht es Dir immer zur Verfügung. Also, das Menü Extras | Makro | Makros aufrufen, als Namen z.B. AlleHyperlinksEntfernen vergeben, darauf achten, daß es in der Normal.dot zur Verfügung steht, dann auf die Schaltfläche [Erstellen] klicken und den Text, der zwischen Sub und End Sub steht, an Cursorposition einfügen - also diesen hier:
Dim HL As Hyperlink
For i = ActiveDocument.Hyperlinks.Count To 1 Step -1
ActiveDocument.Hyperlinks(i).Delete
Next i

Anschließend kannst Du das Makro auf eine Schaltfläche in einer Symbolleiste legen und hast es immer "griffbereit"...
_________________________________

Gruß peppi
(Windows XP Prof. / Office 2003)


als Antwort auf: [#199316]

Word: alle Hyperlinks auf einmal löschen ?

rohrfrei
Beiträge gesamt: 4464

6. Dez 2005, 10:41
Beitrag # 5 von 5
Beitrag ID: #199349
Bewertung:
(3423 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,

nochmals danke, so geht es jetzt.

Gruß


als Antwort auf: [#199321]
X

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
02.02.2023

Prozesse optimieren und effizient gestalten

Zürich
Donnerstag, 02. Feb. 2023, 08.00 - 10.00 Uhr

Digitalisierung, Webauftritt

Digitalisierung mitgestalten - Worauf kommt es an? Wie wichtig ist die Webseite? Webseite mit Word Press? Interne Prozesse optimieren

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: Birol Isik, E-Mailinfo AT bkcc DOT ch

https://digitalisierung-heute.ch/digitalisierung-informationstag-schweiz/

Veranstaltungen
01.03.2023 - 09.03.2023

Online
Mittwoch, 01. März 2023, 00.00 Uhr - Donnerstag, 09. März 2023, 00.00 Uhr

Online Webinar

Wie gehen wir mit diesen Veränderungen um? Was ist notwendig, damit wir die Digitalisierung im Unternehmen klappt? Veränderungsprozesse verstehen und entsprechend handeln Mitarbeiter als Botschafter Webseite mit WordPress erstellen SEA /SEO (Ads aufschalten)

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: B. Isik, E-Mailinfo AT snfa DOT ch

https://www.fernstudiumfitness.ch/digitalisierung-schweiz/