Resime otomatik köprü

[Erhan Üstünel]

Merhaba,
Benim yapmak istediğim otomatik köprü şu şekilde
Eğitime katılan personellerin eğitim bilgileri ve listesini tutuyorum,

Eğitim formunun da görüntüsünü en sağda köprü ile resim ekliyorum
bunu otomatik olarak örneğin X sunununa verdiğim form adına göre (resim adı ile aynı) ilgili dosyanın içindeki aynı adlı resmi açabilirmi
( her satır farklı

 

[yanginci34]

Aşağıdaki kod ile b sütununa göre kendisi link oluşturuyor
not : kırmızı olan yeri kendinize göre uyarlayın.

Sub otomatiklink()
For i = 5 To [b65536].End(3).Row
Range("x" & i).Select
Selection.Hyperlinks.Add Anchor:=Selection, Address:="c:/klasör/" & Cells(i, "b") & ".jpg", _
TextToDisplay:="Resim"
Next i

End Sub

 

[Erhan Üstünel]

Teşekkür ederim ilginiz için, bu makro vardı bende zaman zaman hata veriyor,
tam olarak ihtiyacımı karşılamıyor malesef