LoadPicture Hatası (Resim Gösterememe)

[eneSene]

Merhabalar;
Firmada personel işlemleri takip etmek için yaptığım bir dosya var. Başlangıçta oldukça güzel çalışıyor, bir süre sonra çeşitli userformlar ve makrolar ekledikten sonra ana sayfadaki isim yazdıktan sonra firma sicili, bölümü, görevi ve çalışanın resmini gösteren bir alan var. Anlayamadığım bir noktadan sonra çalışanın resmi diğer bütün bilgiler geliyor ancak resim gelmiyor. Getirmesi gerektiği resim ile ilgili kodlar aşağıda, yardımcı olursanız sevinirim.

Private Sub Worksheet_Change(ByVal Target As Range)
'sayfadaki hücrelerde bir değişiklik olduğunda image1 nesnesine Resim çağırır
Image1.PictureSizeMode = fmPictureSizeModeZoom
    
    Image1.Picture = LoadPicture(['ana_menü'!o16])
    
End Sub

 

[hamitcan]

Küçük bir dosya eklerseniz çözüme ulaşmak daha kolay olabilir

 

[eneSene]

küçük dosya derken oldukça kompleks bir dosya ama küçültmeye çalışayım

 

[Levent Menteşoğlu]

['ana_menü'!o16] hücresinde yazan bir örnek bilgiyi verirmisiniz. Eğer resim yüklenmiyorsa bu hücredeki bilgi hatalıdır.

 

[eneSene]

Kullandığım dosyayı küçülttüm biraz, denedim bunda da aynı hatayı veriyor

 

[eneSene]

Bahsettiğiniz hücrede yazan kod aşağıdadır,

=DÜŞEYARA(K20;per_lis!B:AY;50;0)

Mevcut kodda hiçbir değişiklik yapılmadı, dün akşam evde üst bardaki menüye eklemeler yaptım ve işyerine getirdim ancak resim göstermemeye başladı

 

[eneSene]

Arkadaşlar problemi kendim çözdüm, yardımlarınız için teşekkür ediyorum.

ÇÖZÜM: VBA penceresinde iken Tool menüsünden References'e girip Missing ile başlayan referansı kaldırdım ve dosyayı kaydettim.