Excel Üstbilgi Resim Koyma

Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Merhaba ,

Excel üst bilgi 3 kutucuklu (altalta) tablo desteklemiyor. Ama resim destekliyor

Excelden 3 hücreyi altalta tablo haline getirsem. Resime çevirsem.

Üstbilgiye eklesem / VBA ile

Mümkün olurmu acaba .

Dinamik üstbilgi olmasını istiyorum çünkü

Yardımlarınızı bekliyorum
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,651
Excel Vers. ve Dili
Excel : 2010
Bu şekilde deneyebilirsiniz.
Kod:
ActiveSheet.PageSetup.RightHeader = [M2] & Chr(10) & [M3] & Chr(10) & [M4]
 
Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Ekran Alıntısı.PNG
Ama yukardaki gibi tablo şeklünde gözükmesi gerekiyor.

O yuzden 3 hücreyi kopyala > resim olarak yapıştır > Üst bilgi sağ üst ekle gibi bir vba gerekiyor.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,328
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Bu işlemi gizli satırlarda yapsanız işinizi görmez mi?

Not: Denemedim. Belki olmuyordur.
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,651
Excel Vers. ve Dili
Excel : 2010
Hedefe ulaşıyorsak, ÇİZGİLER bir önem taşıyor mu?
 
Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Bu işlemi gizli satırlarda yapsanız işinizi görmez mi?

Not: Denemedim. Belki olmuyordur.
Gizli satırlardan varsayımınızı anlayamadım. Başlıkları yazdır denedim olabilirdi. Ama oda ilk sayfa etkileniyor.

İlk sayfa üst bilgisi olmaması lazım.

Ekran Alıntısı.PNGbu küçük bilgi değişken ve üstbilgide verebilmem lazım.

Tek yolu bilgim dahilinde farklı sayfada vba ile resime çevirmek üst bilgi eklemek
Kod:
ActiveSheet.Pictures.Paste.Select
Burda takıldığım birinci nokta resime çevirirken çözünürlük yüksek olması kaynak hücrenin boyutlarında görüntünün bozulması

2.PNG
Resimi büyütünce düzgün görünüyor.

İkinci nokta ise bir sayfada yapıştırdığım resimi tanımlayıp
Kod:
ActiveSheet.PageSetup.RightHeader = & tanımlanan resim &
kod ile yerleştirmek.

Ben bir yerden araştırıyorum. umarım burdan birisi yardımcı olur.

iyi Çalışmalar
 
Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Hala bir çözüm bulamadım. Vba ile 3 hücreyi resim çekip sağ üst bilgiye yerleştirmenin çözümü hakkında bilgisi olan
 
Katılım
6 Mart 2005
Mesajlar
6,238
Excel Vers. ve Dili
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Excel Kamera özelliğini kullanınız.
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,758
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
Bu dosyayı irdele
uygulama şöyle olacak mause ile resim çekilecek alanı seç ve sonra
(seçilen alanı üst bilgi olarak kayıt et) düğmesine tıkla
 

Ekli dosyalar

Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Office 2007 Kamera özelliği yok galiba.

Şimdi şöyle bir ilerleme kaydettim.

Hücreden kopyala resim yapıştır kalite kaybediyor.

O yüzden

Şekillerden 3 kutucuk yaptım. tablo gibi birleştirdim. Kopyala yapıp resim olarak yapıştırdım. Kalite kaybolmadı.

Exceldeki resimi üst bilgi sağ kutucuğa koymam gerekiyor.
Bunun için exceldeki resmi dosyaya kaydetmem gerekiyor.
sonra o dosyadaki resmi üst bilgi sağ kutucuk yapıştırmam gerekiyor.

VBA ile

3 kutucuk selection copy picture.paste yapmam
yapışan resmi dosyaya kaydetmem
ve kaydolan resmi üst bilgiye eklemem gerekiyor

Bende bir yandan ilerliyorum umarım yardımı olan olur

Dosyamı ekledim
 

Ekli dosyalar

Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Bu dosyayı irdele
uygulama şöyle olacak mause ile resim çekilecek alanı seç ve sonra
(seçilen alanı üst bilgi olarak kayıt et) düğmesine tıkla
Denedim. Üst bilgi gözükmedi. dosyayı izledim. dosya oluşmadı. modülleri kurcalayım biraz.
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,758
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
Örnek olarak resim ekliyorum J4 -P17 aralığını seçtim ve
(seçilen alanı üst bilgi olarak kayıt et) komut düğmesine tıkladım
yazdırma önizlemesinde de gözüküyor.gariban1.jpggariban2.jpg
seçilen alana ve oluşturulan resime ait ekran görüntüsünü ekliyorum.gariban3.jpg
 
Katılım
15 Mayıs 2015
Mesajlar
518
Excel Vers. ve Dili
Microsoft Office 2019
Örnek olarak resim ekliyorum J4 -P17 aralığını seçtim ve
(seçilen alanı üst bilgi olarak kayıt et) komut düğmesine tıkladım
yazdırma önizlemesinde de gözüküyor.Ekli dosyayı görüntüle 209242Ekli dosyayı görüntüle 209244
seçilen alana ve oluşturulan resime ait ekran görüntüsünü ekliyorum.Ekli dosyayı görüntüle 209245
halit bey tamamen şirketteki bilgisayar ile alakalı galiba. evdeki bilgisayarda çalıştı.
Biraz daha kurçalayacağım. Şekilleride destekledi
Çok Teşekkürler.
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,758
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
Teşekkürler iyi çalışmalar
 
Üst