Hücreleri bağlama ( Fotoğraf olarak )

[semihozturk1987]

Arkadaşlar örneğin bir firma için farklı farklı form hazırlıyorum. excel dosyası içerisinde şu an belki yüzlerce form oldu. yeni bir firma için hazırladığımda ana sayfadaki anteti değiştirdiğimde tüm sayfalardaki antetler değişsin istiyorum.

sekme2 A1 = sekme1 A1 yazdığımızda nasıl oradaki yazılar otomatik sekme2de çıkıyorsa, sekme1de örneğin öztürk aş. firmasının antetini kaldırıp semih aş. nin antetini koyduğumda sekme2de de semih aş. çıksın. çok araştırdım bu konuyu ama elle tutulur bir şey bulamadım.

Yardım ederseniz gerçekten sevinirim. herkese iyi çalışmalar.

 

[Murat OSMA]

Örnek dosya üzerinden izah ederseniz daha net anlaşılacaktır.​

 

[semihozturk1987]

Örnek dosya üzerinden izah ederseniz daha net anlaşılacaktır.​

Murat Bey,

Örnek olarak anlatmaya çalıştım. Dediğim gibi aslında, hücreleri birbirine bağlamak gibi ama simgesel olarak. B1 e =A1 yazdığımızda nasıl oraya yazdığımız kelimeleri alıyorsa, ben o bölüme eklenen fotoğrafı almasını istiyorum.

 

[Murat OSMA]

Bu kodları kullanabilirsiniz;​

Sub Emre()
    Dim i As Byte, a As Byte
    For i = 2 To Sheets.Count
        Sheets(i).Pictures.Delete
    Next i
    Sayfa1.Shapes(1).Copy
    For a = 2 To Sheets.Count
        Sheets(a).Range("a1").PasteSpecial
    Next a
    a = Empty: i = Empty
End Sub

​

 

[semihozturk1987]

Bu kodları kullanabilirsiniz;​

Sub Emre()
    Dim i As Byte, a As Byte
    For i = 2 To Sheets.Count
        Sheets(i).Pictures.Delete
    Next i
    Sayfa1.Shapes(1).Copy
    For a = 2 To Sheets.Count
        Sheets(a).Range("a1").PasteSpecial
    Next a
    a = Empty: i = Empty
End Sub

​

Murat Bey,
Müsait iseniz örnek üzerinde gösterip atabilir misiniz acaba?

 

[Murat OSMA]

Bilmeyenler için kodların kullanımı ile ilgili anlatım yapayım:
Excel'i açın ve sayfadayken ALT+F11 tuşlarına birlikte basın.
Açılan pencerenin üst menüsünden önce Insert sonra da Module seçin ve kodları açılan boş pencereye yapıştırın.
Şimdi makroda herhangi bir satırı seçin ve F5 tuşuna basın.​

 

[semihozturk1987]

Bilmeyenler için kodların kullanımı ile ilgili anlatım yapayım:
Excel'i açın ve sayfadayken ALT+F11 tuşlarına birlikte basın.
Açılan pencerenin üst menüsünden önce Insert sonra da Module seçin ve kodları açılan boş pencereye yapıştırın.
Şimdi makroda herhangi bir satırı seçin ve F5 tuşuna basın.​

Osman Bey,

Başka bir excel sayfasındaki bir şey buradaki sekmelere geçti. Benim istediğim o kutuya koyduğum şeyin diğer kutulara geçmeseydi. Çünkü bunun sonrasında belki bir formda a2ye diğer sekmede g35 e geçmesi için çalışcam.

Şöyle düşünün,



Örneğin ilk sekmede A1 değişkeniniz olur.

2. sekmede G25
3. sekmede F657
4. sekmede H23525 hücrelerine =A1 yazarsınız, ve A1e ne yazarsanız bu sekmelerde de o yazar. Excel in en basit olayı sonuçta. siz daha iyi biliyorsunuz. Ben bunun aynısının fotoğraf, küçük resim vs ile olanını istiyorum. A1' in olduğu bölüme ne koyarsam 2. sekmede G25 3. sekmede F657 4. sekmede H23252 hücrelerinde de o görünsün. İstediğim şey normalde basit duruyor ama çözümü biraz karışık gibime geliyor.

 

[Ömer BARAN]

Merhaba.
Başka bir bakış açısıyla bir alternatif olsun, maksat fikir versin.
Ekteki belgeye bir göz atınız.

Harici belge bağlantısı: dosyayı indirin.

 

[semihozturk1987]

Arkadaşlar biraz uğraştırdı ama sorunu çözdüm bire bir olarak. çok da basitmiş. Herkese faydalı olması için şöyle anlatabilirim.


Örnekte de sundum fakat anlatacak olursam,
Örneğin 2ye 2 satır sütun seçerek bunu çerçeve içine alalım. içine de bir fotograf koyalım. bu 2ye 2 çerçeveli hücreleri başka bir bölüme kopyalarken bir çok kopyalama seçeneği çıkıyor. Biz bunlaradan Bağlı resim olanı seçiyoruz. Böylece ilk 2ye 2 olan hücreye fotoğraf anlamında bağlanmış oluyor. ilk 2ye 2de nasıl ve ne şekilde fotoğraf koyarsanız diğer kısımlarda da o şekilde değişmiş oluyor.

 

[Tevfik_Kursun]

Sayın semihozturk1987,
Evet elinize sağlık, düşündüğünüzü başarmışsınız. Ama nasıl?
Başarılarınızın devamını dilerim.

 

[semihozturk1987]

Sayın semihozturk1987,
Evet elinize sağlık, düşündüğünüzü başarmışsınız. Ama nasıl?
Başarılarınızın devamını dilerim.

Teşekkürler Tevfik Bey,

Valla başka bir tabloda bağlantıları yaparken denk geldim aslında biraz da. Köprülü tablo liste vs. varken köprülü resimi de görünce bu şekilde bir işe yarayabileceğini düşündüm. Daha sonra bir kaç şekilde denedim derken sonuç ortaya çıktı. makro veya formül olmadan sonuca ulaşmak da güzel oldu aslında

 

[Tevfik_Kursun]

Merhaba Arkadaş,
Kusura bakmayın lütfen. Ama benim çok işime yarayabilir. Bu nedenle tekrar yazdım.
Çok güzel, ama, "köprülü resimi" nerede gördünüz, acaba?
Saygılarımla

 

[Ömer BARAN]

Merhabalar.

Konunun başlarında 8 numaralı cevabımın ekinde yer alan belgede bu uygulama zaten var idi.

Sanırım dikkatten kaçmış.

 

[semihozturk1987]

Merhabalar.

Konunun başlarında 8 numaralı cevabımın ekinde yer alan belgede bu uygulama zaten var idi.

Sanırım dikkatten kaçmış.

Ömer Bey,

Sizinkisi köprülüydü yanlış görmediysem. Belli bir çerçeve içerisine hangi fotoğrafı koyarsanız tüm belgelerde o fotoğraf olacak tarzında değildi. Benim örneğe bakacak olursanız anlatmak istediğim biraz daha farklıydı. çerçevenin içine hangi fotoğrafı hangi şekilde koyarsanız o şekilde diğer çerçevelere de iletiyor. nedeni de büyük ihtimal siz fotoğrafı kopyalarken köprülediniz, ben hücreleri bütün olarak fotoğraflı köprüledim. o yüzden hücreler içerisindeki değişiklik yansımış oluyor.

 

[semihozturk1987]

Merhaba Arkadaş,
Kusura bakmayın lütfen. Ama benim çok işime yarayabilir. Bu nedenle tekrar yazdım.
Çok güzel, ama, "köprülü resimi" nerede gördünüz, acaba?
Saygılarımla

Tevfik Bey,

-Örneğin kendinize 5e 5 lik bir çerçeve yapın hücrelerden.
-Daha sonra bu 5e 5lik çerçeveyi komple seçin ve kopyala deyin.
-Ardından istediğiniz diğer 5e 5lik hücre topluluğuna gelin ve ctrl+v yapın
-Yapıştırdığınızda çerçeve köşesinde yapıştırma türü çıkacaktır. Burada da en altta sağda olan "Bağlı Resim" i seçin.

Böylece artık ilk çerçeveye hangi resmi hangi şekilde koyarsanız, diğer çerçevede de aynı şekilde çıkacaktır. Umarım açıklayıcı olmuştur

 

[Tevfik_Kursun]

Evet gördüm, çok teşekkür ederim arkadaşım. Sağol
Saygılarımla