![]() |
MS access question
I went to MR Ecel but they have not answered my question for over teo weeks (even with three bumps).
Here is the question; Quote:
Any hep with this is GREATLY appciated. Thank you. |
This can be done. Insert this code into your worksheet. This will take the values of cell A1 and insert a picture with the same name. This also assusmes that your folder with the images is in C:\Logos. You also need to create an picture object in your worksheet. I can send you an example if you would like or if you do not understand.
Private Sub Worksheet_Change(ByVal Target As Range) Dim WS As Worksheet Dim FName As String If Not Application.Intersect(Range("A1"), Target) _ Is Nothing Then FName = "C:\Logos\" & Target.Text & ".gif" If Dir(FName) <> "" Then Set WS = ActiveSheet WS.OLEObjects("Image1").Object.Picture = _ LoadPicture(FName) End If End If End Sub |
Quote:
Edit: After three bumps you should have bumped a last time with "ARE YOU NOT ENTERTAINED?!?!?!?!" |
| All times are GMT -5. The time now is 06:08 AM. |
Powered by vBulletin Version 3.6.0
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.