Önemli..exelde dizinden resim alma

[bahadirkacar]

excelde bir çalısma sayfasına 60 tane resim cagirmam gerrekiyor. veritabanından resim yollarını alabiliyorum ancak bir hucreye yol belirttigim yani c4 hucresine d:\resimler\resim.jpg seklinde resmin direk gelmesini nasıl sağlarım..ilginize tesekkurler

 

[Merhum İdris SERDAR]

http://www.excel.web.tr/showthread.php?t=22790

3 nolu dosya uygun olabilir.

 

[bahadirkacar]

http://www.excel.web.tr/showthread.php?t=22790

3 nolu dosya uygun olabilir.

tesekkur ederim peki ben hic secmeden direk nasıl getiririm yani belirlenen hucrelere 60 adet resim direk gelece?? bizde buradan cıktı alacaz yapacagımız islem bu..tek tek resim eklemektense hepsi gelsinn ilgine tesekkurer

 

[halit3]

birde bu linke bak aradığını bulacaksın sanırım
http://www.excel.web.tr/showthread.php?t=58047

 

[Merhum İdris SERDAR]

tesekkur ederim peki ben hic secmeden direk nasıl getiririm yani belirlenen hucrelere 60 adet resim direk gelece?? bizde buradan cıktı alacaz yapacagımız islem bu..tek tek resim eklemektense hepsi gelsinn ilgine tesekkurer

1. İlgili hücrelere dosya yollarını yazın.

2. Image1 nesnesini 59 kere kopyalayın.

3. Kodları

Private Sub Worksheet_Change(ByVal Target As Range)

Image1.PictureSizeMode = fmPictureSizeModeZoom
Image1.Picture = LoadPicture(['FORM'!b1])
Image2.Picture = LoadPicture(['FORM'!b2])
Image3.Picture = LoadPicture(['FORM'!b3])

........
.......

Image60.Picture = LoadPicture(['FORM'!b60])

End Sub


şeklinde düzenleyin.


Bakalım olacak mı?


.

 

[bahadirkacar]

1. İlgili hücrelere dosya yollarını yazın.

2. Image1 nesnesini 59 kere kopyalayın.

3. Kodları

Private Sub Worksheet_Change(ByVal Target As Range)

Image1.PictureSizeMode = fmPictureSizeModeZoom
Image1.Picture = LoadPicture(['FORM'!b1])
Image2.Picture = LoadPicture(['FORM'!b2])
Image3.Picture = LoadPicture(['FORM'!b3])

........
.......

Image60.Picture = LoadPicture(['FORM'!b60])

End Sub


şeklinde düzenleyin.


Bakalım olacak mı?


.

yine beceremedim image1 nasıl ekleniyo aradım aradım bulamadım yardımcı olursanız sevinirim

 

[Merhum İdris SERDAR]

View / Toolbars / Control Toolbox'tan Image (Dağ ve güneş resimli olan) tıklayıp, sayfada dilediğiniz buyüklükte bir nesne yaratın. Bu Image1 olur. Bunu her kopyaladığınızda numarayı kendisi otomatik olarak alacaktır.

.

 

[bahadirkacar]

View / Toolbars / Control Toolbox'tan Image (Dağ ve güneş resimli olan) tıklayıp, sayfada dilediğiniz buyüklükte bir nesne yaratın. Bu Image1 olur. Bunu her kopyaladığınızda numarayı kendisi otomatik olarak alacaktır.

.

yaptım ancak hata verdi Type mismatch (Error 13) neden acaba

 

[ersoyalan]

Merhaba,

Resimleri istediğiniz boyutta istediğiniz hücrelere ekliyebileceğiniz bir dosya işinize yarıyabilir.

İyi çalışmalar.
E.ALAN

 

[bahadirkacar]

ben aynı zamanda o resmi orada gormek istiyorum
2 sayfada resmin yolu
1 sayfada resimi istedigim hucrede gormek..