başka sayfadan resim alma

[jackalxxxx4]

forumda bu konu hakkında araştırma yaptım ama sanırım istediğim gibi birşey bulamadım aslında sonuca yaklaştım ama yaptığım işlemde ufak bir sorun var resim geliyor ancak diğer bi numarayı girince o numaraya ait resim gelmiyor.sorunumla ilgili dosyada biraz çalışma yaptım yardımcı olursanız sevinirim.

 

[Levent Menteşoğlu]

Aşağıdaki linkleri inceleyin.

hücreye bir kod yazdığımda ilgili resmi bulması?

otomatik resim eklemek

 

[jackalxxxx4]

verdiğiniz linklere daha önce bakmıştım.zaten aldığım kod ordaki uygulamalardan birine ait sanırım sorunumu uygun bir örnekle açıklarsam daha kolay olacak.yardımlarınız için teşekkürler

 

[jackalxxxx4]

hazırladığım örnek

çalışmamın ilgili yerleri ile yapmış olduklarımı yolluyorum.aslında basit bir aşamaya kadar getirdim.tek bir yerde tıkandım çalışmamı incelerseniz sorunumu çözeceğinize inanıyorum.

 

[Merhum İdris SERDAR]

çalışmamın ilgili yerleri ile yapmış olduklarımı yolluyorum.aslında basit bir aşamaya kadar getirdim.tek bir yerde tıkandım çalışmamı incelerseniz sorunumu çözeceğinize inanıyorum.

Dosyanız ekte.

.

 

[jackalxxxx4]

Hocam Çok SaĞolun İŞe Yaradi Yarimlariniz İÇİn TeŞekkÜrler.

 

[jackalxxxx4]

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.ScreenUpdating = False
Shapes("resim").Delete
Sheets("RESİMLER").Select
ActiveSheet.Shapes([AC7]).Copy
[x3].PasteSpecial
Sheets("P.B.FORM").Select
Selection.ShapeRange.Name = "resim"
[x3].Select

Application.ScreenUpdating = False
Shapes("resim").Delete
Sheets("RESİMLER").Select
ActiveSheet.Shapes([AD7]).Copy
[AC3].PasteSpecial
Sheets("P.B.FORM").Select
Selection.ShapeRange.Name = "resim"
[AC3].Select
End Sub
BU KODA GÖRE BİRİNCİ RESMİN YANINA AYNI KİŞİYE AİT BAŞKA BİR RESİM DAHA YAPMAK İSTEDİM OLMADI.

AD7 FORMÜL VAR
AC3 RESİM GELECEK

AC7 FORMÜL VAR
X3 RESİM VAR.

BİR AŞAMAYI EKSİK YAPTIM GALİBA.SON GÖNDERMİŞ OLDUĞUNUZ EKTE RESMLER SAYFASINA SAĞDAKİ ÇERÇEVEYE İSİM2 ŞEKLİNDE RESİMLERE VE HÜCREYE İSİM VERDİM.İLK İŞLEMİN AYNISI.

 

[Merhum İdris SERDAR]

Ekteki örnek daha elverişli olur, zannedersem.

.

 

[jackalxxxx4]

Resİm 2

Göndermiş olduğunuz ek'te benim formuma uyarlaması zor olur benim için.çünkü formun daha çok sayfası var onlar eklememiştim.sadece resim kısmı kaldı.takıldığım yer burası.ek'te ki örnekte anlatmak istediğimi anlayabilirsiniz.

 

[Merhum İdris SERDAR]

Göndermiş olduğunuz ek'te benim formuma uyarlaması zor olur benim için.çünkü formun daha çok sayfası var onlar eklememiştim.sadece resim kısmı kaldı.takıldığım yer burası.ek'te ki örnekte anlatmak istediğimi anlayabilirsiniz.

Dosyanız bana biraz karışık geliyor. Onu sadeleştirip, ve nasıl bir sonuç elde etmek istediğinizi açıklarsanız, belki bir çözüm üretilebilir.

.

 

[jackalxxxx4]

Gereklİ SadeleŞtİrmelerİ Yaptim

gerkli sadeleştirmeleri yaptım biraz daha anlaşılır hale gelmiştir.umarım

 

[Merhum İdris SERDAR]

gerkli sadeleştirmeleri yaptım biraz daha anlaşılır hale gelmiştir.umarım

Hani? Nerede?

.

 

[jackalxxxx4]

dosyayı yükledim

dosya eklemiştim ama yüklenmemiş şimdi tekrar yükledim.

 

[Merhum İdris SERDAR]

dosya eklemiştim ama yüklenmemiş şimdi tekrar yükledim.

Emrah için yapılmış dosynız ekte.

.

 

[jackalxxxx4]

Hocam Ellerİne SaĞlik.. Bİraz UĞraŞtirdim Sİzİ.ancak Bİr Sorun Var.boŞ Olan KİŞİlerİn Resmİ Olmamasi Gerekİyor. Ancak BoŞ Olan Bİr KİŞİnİn Numarasini Gİrİnce En Son Resİm Ekranda Kaliyor.yada KİŞİ Bİlgİlerİ Tam Olsun Resmİ Olmasin ESKİ RESİM NEYSE O KALIYOR..son Resİm Sankİ O KİŞİye Aİt Gİbİ GÖzÜkÜyor

 

[jackalxxxx4]

konuyla ilgili olarak bir önceki sorum hakkında yardımlarınızı bekliyorum