Question

I am trying to develop a macro that after click on a picture, will do v-lookups on a bunch of cells in a given row.

For example:

• If I click on a cell in Row 10 and then I click on a picture of a poodle (located somewhere in the sheet, not in Row 10), row 10 will be populated with “animal” in one cell, in the next cell “dog”, and in the next cell “poodle”

• And then I click on a cell in Row 11, and then I click on a picture of a palm tree (located somewhere in the sheet), row 11 will be populated with “plant” in one cell, in the next cell “tree”, and in the next cell “palm tree”

Any ideas?
Thanks!

Answer 1

Create a macro in a regular module to handle the image clicks, and assign it to all of your images’ “onaction” property using Right-click >> Assign macro (or in code)

Sub ImageClick()
  Dim rngLookup As Range
  Dim ImgName As String
  ImgName = Application.Caller

  Set rngLookup = ThisWorkbook.Sheets("Lookup").Range("A2:D20")
  With Selection.Cells(1).EntireRow
    .Cells(1).Value = ImgName
    .Cells(2).Value = Application.VLookup(ImgName, rngLookup, 2, False)
    .Cells(3).Value = Application.VLookup(ImgName, rngLookup, 3, False)
    .Cells(4).Value = Application.VLookup(ImgName, rngLookup, 4, False)
  End With
End Sub

As Chris suggested, use a lookup table to fill the values in the selected row: in this case though it’s based on the name of the image on the sheet.