Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Image
BildScreenshot zu Image Image-Seite mit Beispielarbeitsmappe aufrufen

VBA-relativer Pfad

    Betrifft: VBA-relativer Pfad von: Manuel Walch
    Geschrieben am: 30.08.2003 17:00:05

    Hallo,

    mit untenstehendem Befehl wird ein Bild auf einem relativen Pfad aufgerufen und in einem Bildfeld abgebildet:

    ChDir ThisWorkbook.Path & "\"
    Image1.Picture = LoadPicture("Dokumentenpool\Screenshots\PA5.1.jpg")

    Das funktioniert aber nur, wenn die Datei auf einer Festplatte abgespeichert ist. Ich möchte diesen Befehl aber auch von einer CD ausführen können.
    Kann mir jemand weiterhelfen?

    Vielen Dank,

    Manuel

      


    Betrifft: AW: VBA-relativer Pfad von: Hans T.
    Geschrieben am: 30.08.2003 23:47:33

    Hallo Manuel

    Ich nehme an, dass Folgendes funktioniert:

    Image1.Picture = LoadPicture(ThisWorkbook.Path & "\" & "Dokumentenpool\Screenshots\PA5.1.jpg")

    ChDir ... musst du weglassen.

    Viel Erfolg wünscht Hans T.


      


    Betrifft: AW: VBA-relativer Pfad von: Manuel
    Geschrieben am: 31.08.2003 18:14:11

    Danke,

    funktioniert einwandfrei!

    Manuel