Computerhilfen.de Logo
Forum
Tipps
News
Frage stellen

HIlfe bei Excel VBA Code | Bild an Zellgröße anpassen

Hallo zusammen,
ich bin leider kein vba experte und brauche für ein Projekt nur einen kleinen Code, der mir bei einer Wenn Funktion ein Bild in ein bestimmten Zelle einfügt.

Der Code klappt soweit. (siehe weiter  unten)  Was mir noch fehlt, wäre dass sich das Bild an die Zellgröße anpasst  und dabei seine Proportion behält. Kann mir da jemand helfen?
Lieben Dank vorab.

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A6") = 2 Then
Range("F2").Activate
ActiveSheet.Pictures.Insert( _
        "\\Bilder\Bild1.png").Name = "Bild1"
Else
ActiveSheet.Shapes("Bild1").Delete

End If
End Sub



Antworten zu HIlfe bei Excel VBA Code | Bild an Zellgröße anpassen:

...habe es selber lösen können
wen es interessiert  (siehe code unte)
trotzdem vielen Dank Euch :-)

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A6") = 2 Then
Range("F12").Activate
ActiveSheet.Pictures.Insert( _
        "\\Bilder\Bild1.png").Name = "Bild1"
    With ActiveSheet.Pictures
        .ShapeRange.LockAspectRatio = msoFalse
        .Height = Range("F12:F18").Height
        .Width = Range("F12:G12").Width
        .Top = Range("F12:F18").Top
        .Left = Range("F12:F18").Left
        .Placement = xlMoveAndSize
    End With 
Else
ActiveSheet.Shapes("Bild1").Delete
End If
End Sub


« Bestimmte Webseiten lassen sich nicht mehr öffnenIncredimail update »
 

Schnelle Hilfe: Hier nach ähnlichen Fragen und passenden Tipps suchen!

Fremdwörter? Erklärungen im Lexikon!
Quellcode
Ein Quellcode, auch als Quelltext bekannt, bezeichnet einen unkompilierten Programm-Code einer Software. Der Quellcode ist meist in einer der verbreiteten Programmierspra...

Unicode
Ein Unicode ist ein "Einheitsschlüssel", der als internationaler Standard gilt. Unicode ist ein digitaler Zeichensatz zur Darstellung von weitestgehend jedem Schrift...

QR-Code
Die Abkürzung QR steht für "Quick Response" und besteht aus einer quadratischen Matrix mit schwarzen und weißen Punktren. Zudem sind auch Striche zu sehen...