Merhaba
Bir çalışma excel sayfam var bu sayfada ürün,stok ve müşteri adlı 3 adet klosöre bağlı köprülerim var aynı satırda. A3 satırı tanım B3"ürün",c3 "stok",d3"müşteri" klosörlerinden a3 satırındaki Word isimli dosyayı bu hücreler köprüleyecek. mokro çalıştır tuşu olmayacak .A3 dosya ismini yazında köprüleri yapıcak.Bu konuda yardımcı olabilirmisiniz.Bu kod tek başına olunca işime yarıyor ama bana 3 hücrede aynı anda otomatik çalışan bi kod lazım.Bu arada kodu buraya direk yazarsanız iyi olur örnek dosyaları göremiyorum.
Yardımınız için teşekkürler
Sub basla()
For i = 2 To [A65536].End(3).Row
Range("D" & i).Select
Selection.Hyperlinks.Add Anchor:=Selection, Address:="c:/urunler/" & Cells(i, "A") & ".jpg", _
TextToDisplay:="Resim"
Next i
End Sub
Bir çalışma excel sayfam var bu sayfada ürün,stok ve müşteri adlı 3 adet klosöre bağlı köprülerim var aynı satırda. A3 satırı tanım B3"ürün",c3 "stok",d3"müşteri" klosörlerinden a3 satırındaki Word isimli dosyayı bu hücreler köprüleyecek. mokro çalıştır tuşu olmayacak .A3 dosya ismini yazında köprüleri yapıcak.Bu konuda yardımcı olabilirmisiniz.Bu kod tek başına olunca işime yarıyor ama bana 3 hücrede aynı anda otomatik çalışan bi kod lazım.Bu arada kodu buraya direk yazarsanız iyi olur örnek dosyaları göremiyorum.
Yardımınız için teşekkürler
Sub basla()
For i = 2 To [A65536].End(3).Row
Range("D" & i).Select
Selection.Hyperlinks.Add Anchor:=Selection, Address:="c:/urunler/" & Cells(i, "A") & ".jpg", _
TextToDisplay:="Resim"
Next i
End Sub