Inserting multiple images as the result of a formula

[tuma]

Hello. I am working with some data and it would be nice to be able to display it visually. What I want to do is if some formula I am working with results with the answer '5', I want 5 images of buses to appear in the following cell. This would be done multiple times all using the same image. Any advice? thanks.

 

[John Davis]

Hello. I am working with some data and it would be nice to be able to display it visually. What I want to do is if some formula I am working with results with the answer '5', I want 5 images of buses to appear in the following cell. This would be done multiple times all using the same image. Any advice? thanks.

Maybe this could give you an idea:

If Range("A1").Value = 5 Then
Range("B1").Select
ActiveSheet.OLEObjects.Add(Filename:="D:\Common\data\deal.gif", Link:=False _
, DisplayAsIcon:=False).Select
End If

Of course you'd have too find or create the image and save it.

The above inserts a picture into cell B1 due too the Value of the formula in A1.