Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

Diskutiere und helfe bei Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse im Bereich Microsoft Office im Windows Info bei einer Lösung; Hallo zusammen, wir nutzen doc-Dokumente im Kompatibilitätsmodus um Bilder nur als Link mit relativer Pfadangabe einzubinden. Dabei habe ich das... Dieses Thema im Forum "Microsoft Office" wurde erstellt von GFischerMR, 12. November 2019.

  1. GFischerMR
    GFischerMR Gast

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse


    Hallo zusammen,


    wir nutzen doc-Dokumente im Kompatibilitätsmodus um Bilder nur als Link mit relativer Pfadangabe einzubinden. Dabei habe ich das Problem, dass in der doc-Datei trotzdem absolute Pfade auf den Server gespeichert werden, die dann bei anderen Nutzern zu Problemen bzw. Kontaktanfragen zu dem Server führen, so dass mit dem Dkument nicht gearbeitet werden kann.


    Folgendes Szenario:

    • Laufwerk U ist als Netzlaufwerk eingebunden
    • Im Ordner U:\word liegt die Datei Test.doc
    • Im Odner U:\Grafiken liegt die Datei Bild.png


    In der Word-Datei füge ich über Einfügen->Schnellbaustein->Feld ein Feld mit dem relativen Link auf das Bild ein:


    { INCLUDEPICTURE "..\\Grafiken\\Bild.png" \d \* MERGEFORMAT }


    Das Bild wird korrekt angezeigt.


    Wenn ich das Dokument speichere und wieder öffne bleibt der Link relativ und wird auch so in Word über Start->Informationen->Verknüpfungen mit Dateien bearbeiten angezeigt:

    [​IMG]


    Wenn ich mir den Inhalt im Hex-Editor ansehe, finde ich jedoch neben dem realtiven Link trotzdem einen absoluten Pfad auf die Bild-Datei. Seltsamerweise auch nicht auf Laufwerk U, sondern auf die IP-Adresse mit der das Netzlaufwerk verbunden ist. Hier ein Auszug aus dem Hex-Editor:

    [​IMG]

    Ich würde gerne vermeiden, dass im Dokument der absolute Pfad steht, da sonst ein gemeinsames Arbeiten an den Dokumenten in unterschiedlichen Netzwerken nicht möglich ist.


    besten Dank für die Unterstützung

    G. Fischer
     
  2. G.O.Tuhls Win User

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

    Einfach per Dateiauswahldialog:


    [​IMG]


    Allerdings bekommst Du dabei keine relativen Pfade. Die gehen nur mit dem Feld und dem Korrekturmakro.

    Gruß

    G.O.
  3. GFischerMR Win User

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

    Danke für die Antwort. Wie verlinkst du die Bilder ohne die Feldfunktion, also ohne sie einzubetten?

    Makro wäre natürlich eine Möglichkeit, aber leider nur ein Workaround.

    Grüße G. Fischer
  4. GFischerMR Win User

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

    Danke. Jetzt muss ich nochmal nachfragen. Was korrigierst du mit dem Korrekturmakro, wenn dort der relative Pfad steht. Mein Problem ist ja das tief drin im Dokument ein absoluter Pfad steht, den ich über Word selber nicht nicht sehe. Wie greifst du darauf
    zu. Oder hast du dann im INCLUDEPICTURE einen absoluten Pfad stehen?

    Gruß G.Fischer
  5. G.O.Tuhls Win User

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

    Sorry, ist etwas spät geworden.

    Hier die beiden Subs, mit denen ich das Problem gelöst habe. Allerdings mit der Maßgabe, dass die Bilder in einem Unterordner des Projektordners stehen.

    [b]Sub BldPfadAendern()[/b]On Error GoTo fehler    Abbruch = 2    Abbruch = MsgBox("Diese Funktion ändert die Verknüpfungen aller in diesem Text enthaltenen Illustrationen!" _    & Chr(13) & "Das kann etwas dauern; bitte keine Panik, wenn in der Titelzeile von Word 'Keine Rückmeldung' angezeigt wird." _    & Chr(13) & Chr(13) & "Trotzdem weitermachen?", 49, "Vorsicht!")    If Abbruch = 2 Then Exit Sub    Do        Dim OrdnerAuswahl As FileDialog        Set OrdnerAuswahl = Application.FileDialog(msoFileDialogFolderPicker)        ChangeFileOpenDirectory ActiveDocument.Path        NeuPfad = ""        With OrdnerAuswahl            .InitialFileName = ActiveDocument.Path            .AllowMultiSelect = False            .Title = "Bilder-Ordner bestimmen"            .ButtonName = "Auswählen"            .Show        End With        NeuPfad = OrdnerAuswahl.SelectedItems(1)        If Left(NeuPfad, Len(ActiveDocument.Path)) <> ActiveDocument.Path Then            MsgBox NeuPfad & Chr(13) & "Der Bildordner kann nur der Projektordner oder ein Unterordner des Projektordners sein."            NeuPfad = ""        End If    Loop While NeuPfad = ""    PicPath = NeuPfad
    
        PicDir = Right(PicPath, Len(PicPath) - Len(ActiveDocument.Path) - 1)    ActiveDocument.CustomDocumentProperties("PicDir") = PicDir    OrdnerAuswahl.Title = ""    OrdnerAuswahl.ButtonName = ""    Call BildPfadSetzen(PicDir)fehler:End Sub[b]Sub BildPfadSetzen(neuerPfad)[/b]Dim link As VariantActiveWindow.View.ShowFieldCodes = TrueSelection.HomeKey Unit:=wdStorySelection.GoTo What:=wdGoToField, Name:="IncludePicture"Selection.NextFieldlink = Selection.Fields(1).CodeSelection.DeleteOn Error GoTo FertigDo While InStr(LCase(link), "includepicture") > 0        link = Replace(link, "/", "\")        link = Trim(Mid(link, 1, InStrRev(link, ".") + 4))        link = Replace(link, Chr(34), "")        Bild = Right(link, Len(link) - Len(Mid(link, 1, InStrRev(link, "\") - 1)) - 1)        With Selection            .Delete            '.Style = "Bild"            .ParagraphFormat.Reset            .Font.Reset            .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, PreserveFormatting:=False            .Text = "IncludePicture """ & neuerPfad & "\\" & Bild & """ \* mergeformat \d"            .Collapse direction:=wdCollapseEnd            .MoveRight            .GoTo What:=wdGoToField, Name:="IncludePicture"            .NextField            link = Selection.Fields(1).Code        End WithLoopFertig:Selection.WholeStorySelection.Fields.UpdateActiveWindow.View.ShowFieldCodes = FalseSelection.HomeKey Unit:=wdStoryMsgBox "Fertig!" & Chr(13) & "Bildpfade wurden geändert."End Sub
    Gruß

    G.O.
  6. G.O.Tuhls Win User

    Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse

    Das Korrekturmakro extrahiert den Dateinamen und fügt ihn in den neuen relativen Pfad ein, das Ergebnis wird dann in ein neues Feld eingesetzt.

    Gruß

    G. O.
  7. User Advert


    Hi,

    willkommen im Windows Forum!
Thema:

Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse - Microsoft Office

Die Seite wird geladen...

Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse - Similar Threads - Relatives Einfügen Bildern

Forum Datum

Exchange IP-Adresse

Exchange IP-Adresse: hallo liebe Community, mein Provider in Österreich benötigt die IP-Adresse des Microsoft-Exchange-Servers für die Einrichtung der E-Mail-Weiterleitung. Kann mir bitte jemand weiterhelfen, danke....
Microsoft Office 4. Dezember 2018

Grafik mit includepicture als Seriendruck aus Excel-Datenquelle einfügen

Grafik mit includepicture als Seriendruck aus Excel-Datenquelle einfügen: Ich habe folgende Datenquelle: Datei Adresszeilen_1_9_1 Adresszeilen_1_9_2 Adresszeilen_1_9_3 C:\\Users\\Arbeitsbiene\\id1.jpg Frau DU Testfrau Teststrasse C:\\Users\\Arbeitsbiene\\id2.jpg Frau...
Microsoft Office 1. August 2018

Umwandeln von relativen Links in absolute Links im Abbildungsverzeichnis und...

Umwandeln von relativen Links in absolute Links im Abbildungsverzeichnis und...: Hi, andere Mitarbeiter und ich an verschiedenen Arbeitsplätzen stehen vor einem kniffligen Problem. In einem Dokument haben wir drei Verzeichnisse. Das Inhaltsverzeichnis war während der...
Microsoft Office 20. Juni 2018

IP Adresse

IP Adresse: Es giebt ein Tool das Automatisch die IP Adresse eines PC s löscht und neu erstellt , wenn man es benutzt . Frage : Währe dies nicht auch eine wirkungsvolle Metode um Hacker abzuwäre ?
Allgemeines 25. Februar 2018

Bildgröße ändern / Dialogfeld / Absolut & Relativ

Bildgröße ändern / Dialogfeld / Absolut & Relativ: Hallo :) WEnn ich die Größe eines Bildes ändern möchte und das Dialogfeld öffne, kann man in den Abschnitten für Höhe & Breite diese Absolut & Relativ angeben. Bei mir ist Relativ immer...
Microsoft Office 21. Januar 2018

Excel 2013 (u.a.) Relative und Absolute Verweise auf das Tabellenblatt

Excel 2013 (u.a.) Relative und Absolute Verweise auf das Tabellenblatt: Hallo Zusammen! Während die Frage ob ein Verweis absolut oder relativ ist, für den Verweis auf Spalte und Zeile schon in Excel 95 gut gelöst war, ist das Problem mit den Verweisen auf ein...
Microsoft Office 27. September 2017

IPv4 trotz Eingabe über folgende IP-Adresse verwenden, steht es danach auf "IP-Adresse...

IPv4 trotz Eingabe über folgende IP-Adresse verwenden, steht es danach auf "IP-Adresse...: Hallo, Seit heute habe ich plötzlich ein Problem. IPv4 trotz Eingabe über folgende IP-Adresse verwenden, steht es danach auf "IP-Adresse automatisch beziehen" Dadurch wird der falsche DNS...
Allgemeines 14. Dezember 2016
Relatives Einfügen von Bildern mit INCLUDEPICTURE - trotzdem absolute Pfadangabe mit IP-Adresse solved
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.