VBA Print Ayarlari

VBA ile prin ayarlarini nasil yapabilirsiniz;

Asagidaki kodlara goz atiniz..

Sub PutWorksheetTabNameintoFooter()
Dim wksht As Excel.Worksheet
For Each wksht In Excel.Worksheets
With wksht.PageSetup
.CenterFooter = wksht.Name
.PrintTitleRows = "$1:$1"
.PrintGridlines = True
.Orientation = xlLandscape
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = False
End With
Next wksht
End Sub

.CenterFooter = wksht.Name ‘ Bu kod ile sayfa dibine yazacaginiz yazinin sayfaniz adinin olmasini ve oprtaya yazilmasini sagliyorsunuz..

.PrintTitleRows = “$1:$1” Bu kod ile basilan tum sayfalarin basliginin A satirin yani ilk satirin olmasini sagliyorsunuz..

.PrintGridlines = True Bu kod ile Gridlerin yani exceldeki hucrelerin ciktida gorunmesini sagliyorsunuz..

.Orientation = xlLandscape Bu kod ile ciktinizin yatay olmasini sagliyorsunuz..

.Zoom = False Bu kod ile zoom olmamasini sagliyorsunuz..

.FitToPagesWide = 1 Bu kod ile sagdan soldan tek sayfaya sıkıstırma yapiyorsunuz..

.FitToPagesTall = False Bu kod ile sayfalarin uzunlugunda bir sinirlama olmamasini sagliyorsunuz .FitToPagesWide = 1 gibi sayi koyarakta kullanabilirsiniz..

 

 

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


5 + 8 =