Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

In VB auf eine Excelzelle beziehen





Frage

Hallo! Und zwar möchte ich in die Zelle A27 den Namen eines Bildes eintragen, dass dann in E12 erscheinen soll. Mein Problem ist, dass die Bilder in einem Ordner auf einer anderen Festplatte liegen und ich keine Ahnung habe, wie ich in VB den Befehl stricken muss, damit er den Pfad anwählt und dort dann nach dem Bild sucht und es anzeigt. Gruß Maik

Antwort 1 von coros

Hallo Maik,

das Makro müsste dann ungefähr wie nachfolgendes aussehen. Kopiere es in ein StandardModul und starte es über eine Befehlsschaltfläche.

Option Explicit

Sub Bild_einfuegen()
If Range("A27") <> "" Then
    Range("E12").Select
    ActiveSheet.Pictures.Insert ("H:\Makrovoragen\" & Range("A27"))
    End If
End Sub


Bei Fragen melde Dich.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 2 von coros

Hi,

ich nochmal. Hatte vergessen zu erwähnen, dass Du den Pfad in dem Makro natürlich noch anpassen musst.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 3 von ratloser_gast

hmm ja das klappt soweit. Danke schonmal dafür...
Könnt ihr mir auch noch sagen, wie ich es anstelle,
dass bei einer neuen Eingabe das alte Bild gelöscht wird und das neue anstelle Dessen angezeigt wird?

Also quasi wie das script automatisch bei einer neuen Eingabe wieder anläuft und das alte Bild ersetzt