Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > Diğer Yazılımlar > Windows-Word-PowerPoint....
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Windows-Word-PowerPoint.... Excel haricindeki Ofis programları ile ilgili konular.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 20-06-2016, 15:58   #1
sametumur
Altın Üye
 
Giriş: 03/10/2013
Mesaj: 106
Excel Vers. ve Dili:
2010 ve türkçe
Varsayılan üst bilgi değişimi

arkadaşlar merhaba,

elimde 100 sayfalık bir döküman var. bu dökümanın örn: ilk 10 sayfasının üst bilgisinde (sağ üst) ek-a yazsın, ikinci 3 sayfasında (yani 11-13) ek-b yazsın, yine devamında 14-19 arasında ek-b lahika-1 yazsın. gibi bi şey istiyorum.

mümkünatı var mıdır?
sametumur Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-06-2016, 16:26   #2
kuvari
Destek Ekibi
 
kuvari kullanıcısının avatarı
 
Giriş: 04/05/2007
Şehir: İstanbul
Mesaj: 2,633
Excel Vers. ve Dili:
OFİS 2013 TÜRKÇE-İNG. 64 BİT
Varsayılan

Merhaba,

Bildiğim kadarı ile sayfa görünümünde bu dediğinizi yapamazsınız ama çıktı alırken farklı üst bilgiler getirilebilir.
Gerçek çalışmanızı bilmediğimden aşağıdaki kodu kendi dosyanıza uyarlayınız.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub denenem()

For Each syf In Sayfa1.HPageBreaks
x = x + 1
Select Case x

Case 1 To 10
Sayfa1.PageSetup.RightHeader = "123456"
Case 11 To 13
Sayfa1.PageSetup.RightHeader = "456789"
Case Else
Sayfa1.PageSetup.RightHeader = "diğer"
End Select

Sayfa1.PrintOut x, x
Sayfa1.PageSetup.RightHeader = ""
Next

End Sub
__________________
Bilgi kadar zenginlik, cehalet kadar yoksulluk yoktur.
(Hz. Ali)

Bu mesaj en son " 20-06-2016 " tarihinde saat 16:44 itibariyle kuvari tarafından düzenlenmiştir....
kuvari Çevrimiçi   Alıntı Yaparak Cevapla
Eski 20-06-2016, 21:20   #3
sametumur
Altın Üye
 
Giriş: 03/10/2013
Mesaj: 106
Excel Vers. ve Dili:
2010 ve türkçe
Varsayılan

Bu kodu word dökümanıma uyarlayıp dopdf ile yazdırabilirsem işim görülmüş olur. Denicem
Ancak kodun

For Each syf In Sayfa1.HPageBreaks
x = x + 1

Kısmını anlayamadım
sametumur Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-06-2016, 08:28   #4
kuvari
Destek Ekibi
 
kuvari kullanıcısının avatarı
 
Giriş: 04/05/2007
Şehir: İstanbul
Mesaj: 2,633
Excel Vers. ve Dili:
OFİS 2013 TÜRKÇE-İNG. 64 BİT
Varsayılan

Çok pardon siz soruyu word bölümüne sormuşsunuz.
Kodlar word'da çalışmayacaktır.
__________________
Bilgi kadar zenginlik, cehalet kadar yoksulluk yoktur.
(Hz. Ali)
kuvari Çevrimiçi   Alıntı Yaparak Cevapla
Eski 21-06-2016, 09:07   #5
sametumur
Altın Üye
 
Giriş: 03/10/2013
Mesaj: 106
Excel Vers. ve Dili:
2010 ve türkçe
Varsayılan

word için kod yazılabilir mi bu konuyla ilgili?
sametumur Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-06-2016, 18:10   #6
alicimri
 
Giriş: 12/12/2015
Mesaj: 381
Excel Vers. ve Dili:
Ofis 2003
Varsayılan

Sayın sametumur
Manuel olarak örneğinize göre;
1) Sayfa 1'de Üst Bilgi ve Alt Bilgi iletişim Kutusu açın, Sağa yanaşık biçimde ek-a yazın
2) Sayfa 10'gelin Ekle/Kesme/Bölüm sonu türlerinde sonraki sayfa yı işaretleyin.
3) Sayfa 11'e gelin Üst Bilgi ve Alt Bilgi iletişim Kutusu açın öncekine bağlan kutusundaki seçimi kaldırın ek-a silin, ek-b yazın.
Aynı şekilde diğer durumlar içinde 2 ve 3'ü tekrarlayın.
alicimri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-06-2016, 22:59   #7
sametumur
Altın Üye
 
Giriş: 03/10/2013
Mesaj: 106
Excel Vers. ve Dili:
2010 ve türkçe
Varsayılan

alicimri teşekkür ederim, tam istediğim gibi bi çözüm olmuş.
sametumur Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 15:51


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden