Excel'de eklenen resim sayısı hk.

[muratdemirtaş1]

Değerli Arkadaşlar,


Excel tabloda numaraya göre resim ekliyorum hücreye, bunların hepsi tamam da bir excel tablosunun içine resim ekleme sayısı sınırlımıdır merak ettim. Çünkü 61. resmi eklediğimde hata veriyor. Ekte size hata görüntüsünü ekledim, cevabınızı merakla bekliyorum.

İyi çalışmalar.

 

[Ferhat Pazarçevirdi]

Resim adedi olarak böyle bir sınırlama olduğunu sanmıyorum.

Siz eniyisi, sayfaya resim ekleme kodlarınızı buraya yazınız. Aldığınız hatanın hangi satırda karşısınıza çıktığını da belirtiniz.

 

[muratdemirtaş1]

Excel'de eklenen resim sayısı

merhaba,

kullandığım kodlar :

Option Explicit

Private Sub Worksheet_Calculate()
Dim oPic As Picture
Me.Pictures.Visible = True
With Range("B3")
For Each oPic In Me.Pictures
If oPic.Name = .Text Then
oPic.Visible = True
oPic.Top = .Top
oPic.Left = .Left
Exit For
End If
Next oPic
End With
End Sub

ve aldığım hata :

Run-time error '1004':
Pictures sınıfının Visible özelliği kurulamıyor

NOT: 60 tane resim olunca sorunsuz çalışıyor 61. resmi eklediğimde hata alıyorum. Bunun sebebi nedir anlamadım.

 

[Ferhat Pazarçevirdi]

Aynı hatayı ben almaya çalıştım ama, 70 kadar resimle denedim herhangi bir hata almadan kodlar düzgün olarak çalıştı ... Resim Gruplaması, Sayfa Koruması gibi ortam şartlarını da değitirdiğim halde, yine hata yok ...

Sizde farklı olan nedir?

Ve en önemlisi kod hangi satırda hata veriyor ? (Siz iki yerde, visible özelliğini kullanıyorsunuz)

 

[muratdemirtaş1]

D4 hücresine yazdığım numarayı diğer sayfada sorgulayıp B3 hücresine alıyor ve ordaki ada uygun olan resmi alıp yine B3 hücresine yerleştiriyor.

 

[muratdemirtaş1]

Arkadaşlar sorunu hallettim.
Ferhat bey'in denemesi bana fikir verdi ve başka bir kitaplıkta yapınca sorunsuz çalıştı.
hepinize teşekkür ederim.