Microsoft Excel.

How do I display an image in an Excel cell based on the user’s selection in the dropdown of another cell?

The code below stops at the second last line:
imageData = imagePath.Picture
with the message ‘invalid qualifier’.

I am sure I have specified the correct worksheet and cell reference which contain the image. I don’t know if the surrounding syntax is correct.

Sub ShowImageBasedOnDropdown()
    Dim ws As Worksheet
    Dim dropdownValue As String
    Dim imagePath As String
    Dim pic As Picture
    
    ' Set the worksheet where the dropdown and target cell are located
    Set ws = ThisWorkbook.Sheets("purchasessheet")
    
    ' Get the value from the dropdown (for example, E2)
    dropdownValue = ws.Range("E2").Value
    
    ' Clear any existing pictures in the target cell (for example, D2)
    For Each pic In ws.Pictures
        If Not Intersect(pic.TopLeftCell, ws.Range("D2")) Is Nothing Then
            pic.Delete
        End If
    Next pic
    
    ' Select the image path based on the dropdown value
    Select Case dropdownValue
        Case "Corn"
            imagePath = ThisWorkbook.Sheets("lookupsheet").Range("J2")
        Case "Rice bran"
            imagePath = ThisWorkbook.Sheets("lookupsheet").Range("J3")
        Case "Eggstock"
            imagePath = ThisWorkbook.Sheets("lookupsheet").Range("J4")
        ' Add more cases for other dropdown values as needed
    End Select
    
    imageData = imagePath.Picture

    Range("purchasessheet!D2").Picture = imageData
End Sub