ground
yani yeni belge açtığımda eğer 1 den fazla ise otomatik olarak sayfa numarası versin.
yani yeni belge açtığımda eğer 1 den fazla ise otomatik olarak sayfa numarası versin.
0
her açılışta değil de ufak bir makro yazarak halledebilirsiniz bunu.
bakın ben size yazdım:
Sub Macro1()
If (Selection.Information(wdNumberOfPagesInDocument) > 1) Then
Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberRight, FirstPage:=True
End If
End Sub
Tools - Macros'tan yeni bir macro yaratıp bu kodu koyduktan sonra araç çubuklarından birine bir düğme olarak koyabilirsiniz. Düğme basınca belgede birden fazla sayfa varsa sayfa numaraları eklenecektir.
***
Ha yok istediğiniz şey her yeni yaratılan belgede ilk sayfa dışında sayfa numaraları olsun ise o da kolay. Insert-Page Numbers ile sayfa numaraları ekleyin (Show number on first page seçili olmadan). Sonra bu belgeyi kaydedin. Bilgisayarınızda Normal.dot dosyasını aratıp bulup bu belgeyi onun üstüne çekin.
bakın ben size yazdım:
Sub Macro1()
If (Selection.Information(wdNumberOfPagesInDocument) > 1) Then
Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberRight, FirstPage:=True
End If
End Sub
Tools - Macros'tan yeni bir macro yaratıp bu kodu koyduktan sonra araç çubuklarından birine bir düğme olarak koyabilirsiniz. Düğme basınca belgede birden fazla sayfa varsa sayfa numaraları eklenecektir.
***
Ha yok istediğiniz şey her yeni yaratılan belgede ilk sayfa dışında sayfa numaraları olsun ise o da kolay. Insert-Page Numbers ile sayfa numaraları ekleyin (Show number on first page seçili olmadan). Sonra bu belgeyi kaydedin. Bilgisayarınızda Normal.dot dosyasını aratıp bulup bu belgeyi onun üstüne çekin.
0
