Bilder laden

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Bilder laden von: Mark
Geschrieben am: 25.03.2005 21:46:45

Hallo,
hier mein Problem:
In dem Code von unten wird das Bild von dem Ort "z:\Stahlbetonbau\Basisdaten\Button\Bild1.jpg" geladen. Wie kann man dieses Verzeichnis allgemein angeben, damit das Bild auch von anderen Laufwerken (C:, D:, E, usw.) geladen werden kann.










VBA Code:

Private Sub OptionButton1_Click()
Image1.Picture = LoadPicture("z:\Stahlbetonbau\Basisdaten\Button\Bild1.jpg")
Cells(1, 2).Value = 1
Cells(2, 2).Value = 0
Cells(3, 2).Value = 0
Cells(4, 2).Value = 0
Cells(5, 2).Value = 0
End Sub

Bild


Betrifft: AW: Bilder laden von: Oberschlumpf
Geschrieben am: 25.03.2005 22:00:25

kleiner Dialog zwischen Excel und XP

Excel: "Hey, lad mal n Bild in meine Tabelle."
XP: "Aus welchem Verzeichnis denn?"
Excel: "hmm..keine Ahnung"
XP: "und welches Bild?"
Excel: "weiss ich auch nicht."
XP: "OK Dann bleibt Deine Tabelle ohne Bild."
Excel: "OK - Makro beendet."

Hallo Mark

So geht es natürlich nicht :-)
Du musst schon dem Makro genau "sagen", woher es welche Art von Datei laden soll.

Eine Möglichkeit wäre vielleicht, wenn Du das Verzeichnis und den Namen der Bilddatei in eine Zelle schreibst und erst dann den OptionButton anklickst.

Bsp für Zelle A1:
In Zelle A1 steht: z:\Stahlbetonbau\Basisdaten\Button\Bild1.jpg
Private Sub OptionButton1_Click()
Image1.Picture = LoadPicture(Range("A1").Value)
Cells(1, 2).Value = 1
Cells(2, 2).Value = 0
Cells(3, 2).Value = 0
Cells(4, 2).Value = 0
Cells(5, 2).Value = 0
End Sub

Mit Range("A1").Value wird der Wert in Zelle A1 an die LoadPicture-Funktion übergeben.
Nun kannst Du also jedes beliebige Verzeichnis mit jeder im angegebenen Verzeichnis vorhandenen Bilddatei eintragen.

Konnte ich Dir mit diesem Lösungsvorschlag helfen?

Ciao
Thorsten


Bild


Betrifft: AW: Bilder laden von: Mark
Geschrieben am: 25.03.2005 22:10:10

Hallo Thorsten,
das ist eine gute Lösung!
Vielen Dank!
-Mark-


Bild


Betrifft: AW: Bilder laden von: Bert
Geschrieben am: 25.03.2005 22:01:43

Hi,

verstehe nicht ganz, meinst du wenn er auf Z: nichts findet dann in C: suchen usw.?

mfg Bert


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Bilder laden"