Uygulamanın sayfa yapısı hakkında yardım
Tarih
03/08/2012 14:01
Konu Sahibi
QATLET
Yorumlar
4
Okunma
1343
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



QATLET
sevelim & sevilelim
Kullanici Avatari
Aktif Üye
Z....
102
02/02/2012
20
Eskişehir
Ofis 97
06/10/2016,11:20
Çözüldü 
Merhabalar;

resim

Bir Access uygulamasının sayfa yapısını ( kenar boşlukları " tümü 10"- sayfa boyutu " A4"- dikey / yatay "dikey") düzenleyebileceğim bir kod varmıdır ?

iyi günler.
Cevapla


Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.544
7
30/10/2008
804
Tekirdağ
Ofis XP
02/12/2016,15:18
Çözüldü 
Araçlar - Seçenekler - Genel sekmesine bakın. Orada Kenar Boşluklarını varsayılan olarak ayarlayabilirsiniz. (Orada birim cm olabilir, sayfa yapısında mm'dir, dikkat edin)
Sayfa boyutu (A4) kısmı kullandığınız yazıcı ve onun ayarları ile ilgili olması lazım.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla


QATLET
sevelim & sevilelim
Kullanici Avatari
Aktif Üye
Z....
102
02/02/2012
20
Eskişehir
Ofis 97
06/10/2016,11:20
Çözüldü 
Bu işlemi bahsettiğiniz şekilde değilde kod yazarak yapabilmemiz mümkün değilmi.
Cevapla


Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.544
7
30/10/2008
804
Tekirdağ
Ofis XP
02/12/2016,15:18
Çözüldü 
Bu kodlar Access'in Araçlar-Seçenekler menüsündeki Marginlerin kodu:

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
'Print margins, Left margin
Application.SetOption "Left Margin", "1cm"

'Print margins, Right margin
Application.SetOption "Right Margin", "1cm"

'Print margins, Top margin
Application.SetOption "Top Margin", "1cm"

'Print margins, Bottom margin
Application.SetOption "Bottom Margin", "1cm"




Bu kodlar sadece istenilen rapor için geçerli.

Visual Basic Code
1
2
3
4
5
6
7
8
9
Private Sub Report_Open(Cancel As Integer)
    
    Me.Printer.PaperSize = acPRPSA4  'A4 kağıt boyutu
    Me.Printer.BottomMargin = 10
    Me.Printer.TopMargin = 10
    Me.Printer.LeftMargin = 10
    Me.Printer.RightMargin = 10

End Sub

Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla


QATLET
sevelim & sevilelim
Kullanici Avatari
Aktif Üye
Z....
102
02/02/2012
20
Eskişehir
Ofis 97
06/10/2016,11:20
Çözüldü 
Çok teşekkürler. Bu kodlar işimi gördü.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Personel İzin Takip Prog. Hakkında ? captain_10 4 218 28/11/2016, 14:28 atoz112
  Güncelleştirme Sorgusu Çalıştırınca Kayıt Kilit Hatası Hakkında shalala 2 53 23/11/2016, 00:39 shalala
  Pencere Gizleme Hakkında Serkan Çevik 3 104 09/11/2016, 22:43 Serkan Çevik
  SMS Göndermek Hakkında (Access 2007-2010) WiniFred 9 1.763 09/11/2016, 15:04 atoz112
Çözüldü Hizmet Formu Hata İbaresi Hakkında Serkan Çevik 7 231 01/11/2016, 21:52 Serkan Çevik


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya