Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Viele Hyperlink-Ziele in Word ändern

Frage Microsoft Microsoft Office

Mitglied: Userin-Muenchen

Userin-Muenchen (Level 1) - Jetzt verbinden

18.09.2009, aktualisiert 11:51 Uhr, 16592 Aufrufe, 7 Kommentare

Sehr viele Pfade für in Word gesetzte Links werden geändert!

Hallo,

also: meine Chefin schreibt an einen QM-Dokument und setzt dort an die 100 Hyperlinks mit Pfaden zu anderen Dokumenten auf dem Server. Nun wird aber planmäßig in 2 Wochen der Name des Hauptordners geändert: von "FTZ" auf "Avanta".

Mit der Suchen-Ersetzenfunktion wird zwar die Anzeige geändert und wenn ich die Funktionen einblende auch "scheinbar" der Pfad, aber der Klick mit der rechten Maustaste auf den Link - dann auf Bearbeiten zeigt, dass eigentlich gar nichts geändert wurde, und der Link deswegen auch nicht funktioniert.

Bitte bitte um eure Hilfe, wie die Links, OHNE jeden einzelnen neu verknüpfen zu müssen, "relativ" schnell an den neuen Pfad - Namen angepasst werden können.

DANKE und regnerische Grüße aus München
Mitglied: 76109
18.09.2009 um 12:28 Uhr
Hallo Userin-München!

Das läßt sich einfach über ein Makro lösen:
01.
Const OldText = "FTZ" 
02.
Const NewText = "Avanta" 
03.
 
04.
Sub ReplaceHyperlinks() 
05.
   Dim Link As Hyperlink 
06.
   For Each Link In ActiveDocument.Hyperlinks 
07.
      Link.Address = Replace(Link.Address, OldText, NewText, 1, -1, vbTextCompare) 
08.
   Next 
09.
End Sub
Wenn im Link-Anzeige-Text auch der Pfad angezeigt bzw. ersetzt werden soll, dann so:
01.
Const OldText = "FTZ" 
02.
Const NewText = "Avanta" 
03.
 
04.
Sub ReplaceHyperlinks() 
05.
   Dim Link As Hyperlink 
06.
   For Each Link In ActiveDocument.Hyperlinks 
07.
      Link.Address = Replace(Link.Address, OldText, NewText, 1, -1, vbTextCompare) 
08.
      Link.TextToDisplay = Link.Address 
09.
   Next 
10.
End Sub
Gruß Dieter
Bitte warten ..
Mitglied: Userin-Muenchen
18.09.2009 um 12:50 Uhr
Danke Dieter, da scheint die Lösung nun ja ganz ganz nahe... aber ich hab noch ein klitze-kleines Problem, *hüstel*

diese Art von Makros hab ich noch nie gemacht. ich schimpfe mich zwar hier "first level support" aber nun hab ich keinen blassen DUNST... aber sehr lernfähig )

Wo muss ich da rein, um das eingeben zu können?
DANKE
Bitte warten ..
Mitglied: 76109
18.09.2009 um 13:15 Uhr
Hallo Userin-München!

Kein Problem. Das muss Dir nicht peinlich sein

Führe folgende Schritte aus:
1. Document öffnen
2. Klick <Menu><Extras><Makro><Visual Basic Editor>
3. Gehe zu <Project "Name Document"><ThisDocument>
4. Doppelklick auf <ThisDocument>
5. Quelltext kopieren und in ThisDocument einfügen.
6. Klick Symbol Speichern
7. VB-Editor schließen

Makro starten:
1. Klick <Menu><Extras><Makro><Makros>
2. Auswahl Makro ReplaceHyperlinks
3. Ausführen

Das war's schon

Gruß Dieter
Bitte warten ..
Mitglied: Userin-Muenchen
18.09.2009 um 13:51 Uhr
SUPER!
Ich hab's!!! GENIAL, du bist spitze! *kranzbindeundumhänge*

DANKE,

ich find administrator.de sowieso das genialste deutschsprachige Forum rund um IT-PC usw.!!!! Bekomm und finde auch auf die seltsamsten Probleme IMMER Antworten!

Danke nochmal,
IHR seid spitze!
LG
Userin-München
Bitte warten ..
Mitglied: hugipe
18.09.2009 um 14:30 Uhr
Ich hatte genau vor ein paar Minuten das gleiche Problem und hab dank Google und diesem Forum die Lösung gefunden.

Besten Dank!!!
Bitte warten ..
Mitglied: 76109
18.09.2009 um 14:47 Uhr
Hallo zusammen!

Na Toll. Freut mich, wenn ich euch beiden gleichzeitig helfen konnte. Und Danke für die Blumen

Dann wünsche ich euch ein schönes WE

Gruß Dieter
Bitte warten ..
Mitglied: Userin-Muenchen
18.09.2009 um 15:37 Uhr
Dir auch, lieber Dieter! hast übrigens meine Chefin auch glücklich gemacht! *lach* ich glaub mit mir hast mehr freude.... hi hi hi
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Word 2013: Dokumente mit Hyperlinks als PDF (1)

Frage von supertux zum Thema Microsoft Office ...

Microsoft Office
Adressen aus Hyperlinks auslesen (3)

Frage von kluthi69 zum Thema Microsoft Office ...

Outlook & Mail
gelöst Outlook Hyperlinks per GPO deaktivieren (9)

Frage von amtgransee zum Thema Outlook & Mail ...

Windows Server
gelöst Word 2010 : Absatz - Abstand per GPO ändern (3)

Frage von johanna-p zum Thema Windows Server ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (14)

Frage von ZeroCool23 zum Thema Windows 10 ...

Router & Routing
gelöst Getrenntes Routing bei VoIP und Daten (12)

Frage von Hobbystern zum Thema Router & Routing ...