hücreye göre resim sığdırma

[ebebe41]

merhabalar. exceli amatörce kullanan bir kullanıcı olarak bir sorum olacak.
bir dosyam var,içinde 50 tane sayfa var.
her sayfada birleştirilmiş bir alana resim ekliyorum.ancak kendi boyutlandırdığım alana resmi ekledikten sonra, her seferinde
manuel olarak resmi alana sığdırmaya çalışıyorum.bu da çok zamanımı alıyor.
sizden ricam, alan boyutu neyse resim eklediğimde direk o alan boyutunda boşluksuz sığmasını nasıl sağlarım.
teşekkürler

 

[Haluk]

Bu isteğiniz VBA ile yapılabilir.... forumda bir çok örnek var, bir tanesi aşağıdaki linktedir.

https://www.excel.web.tr/threads/makro-ile-resimli-sinif-oturma-plani-olusturma.175323/

Forumdaki örnek dosyaları incelemeniz için Altın Üyelik almanızı tavsiye ederim.

.

 

[alicimri]

Eğer sayfanızda tek bir resim varsa, Makro kaydet tıklayın, bir kısa yol atayıp boş bir makro oluşturun, içine aşağıdaki kodu yapıştırın.
Sayfaya resim yapıştırdıktan sonra makroyu kısa yol ile çalıştırın.

With ActiveSheet.Shapes(1)
.Left = Range("A4:B5").Left
.Height = Range("A4:B5").Height
.Width = Range("A4:B5").Width
.Top = Range("A4:B5").Top
End With

 

[alicimri]

Sonradan fark ettim, "birleştirilmiş bir alana" demişsiniz, A4, B4, A5 ve B5 hücreleri birleştirilmiş olmasına göre yukardaki kodu değiştirdim.

 

[ebebe41]

merhaba
dediğiniz gibi yaptım ama olmadı A4-B5 alanına resim oturmuyor.
sayfanın altında küçük bir logo daha var.sabit olan.
ona hiçbirşey yapmayacağım.
belki o logo var diye mi olmuyordur acaba?