Açıklamada ürün resmi.

[sakiogluo]

Ürün kodları olan bir listem var. Bu listedeki ürünlerden herhangi bir ürünün yazılı olduğu hücreyi seçince o kodla isimlendirilmiş resim i açıklama içerisinde göstermesini istiyorum. Örnek dosyada daha iyi anlaşılacaktır. Sitede benzer çalışmalar var ancak tam sonuçlanmış bir çözüm yok. Yardımcı olabilen varsa şimdiden çok teşekkürler

 

[baknediycem]

MERHaba

Ürün kodları olan bir listem var. Bu listedeki ürünlerden herhangi bir ürünün yazılı olduğu hücreyi seçince o kodla isimlendirilmiş resim i açıklama içerisinde göstermesini istiyorum. Örnek dosyada daha iyi anlaşılacaktır. Sitede benzer çalışmalar var ancak tam sonuçlanmış bir çözüm yok. Yardımcı olabilen varsa şimdiden çok teşekkürler

sorduğunuz seyi hemen hemen yapmışsınız zaten.

bence vba ya da makroya gerek kalmadan resmin üstüne ya da boş bir kenara acıklama yazabilirsiniz.

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin.

Sub resimekle()
On Error Resume Next
For a = 7 To [c65536].End(3).Row
MsgBox "C:\resimler\" & Cells(a, "c") & ".JPG"
Cells(a, "c").Comment.Visible = True
Cells(a, "c").Comment.Shape.Select True
Selection.ShapeRange.Fill.UserPicture "C:\resimler\" & Cells(a, "c") & ".JPG"
Cells(a, "c").Comment.Visible = False
Next
End Sub

 

[enteresan]

Denedim ama yapamadım. sakiogluo kardeşim yapabildiyse buraya eklemesini rica edebilir miyim.?