Gelecek makalede, Word belgenizi işaretlemeler olmadan yazdırmanın 3 hızlı yolunu tanıtmaya odaklanacağız.
Belgeniz revizyon gerektiriyorsa, belgenizde her türlü işaretlemeyi kesinlikle alırsınız. Onları ekranda göstermemenin yolları var. Bunları yazdırmamaya ne dersiniz?
Cevap olumlu. Ve bugünkü konumuz, hedefe ulaşmak için size 3 hızlı ve etkili yöntem sağlamaya ayrılmıştır.
Yöntem 1: Yazdırma Seçeneklerini Değiştirin
- Başlamak için Şeritteki "Dosya" sekmesine tıklayın.
- Ardından “Yazdır” komutunu tıklayın.
- Ardından “Ayarlar” bölümüne gidin ve ilk açılır kutuya tıklayın.
- Menüde, “İşaretlemeyi Yazdır” seçeneğinin seçimini kaldırın. İşaretlemeleri sağ taraftaki ön izlemede hiçbir yerde görmezsiniz, tam olarak alacağınız sonuç budur.
- Son olarak, yazıcıyı seçin ve diğer biçimlendirmeyi ayarlayın ve "Yazdır"a tıklayın.
Yöntem 2: VBA Kodlarını Kullanın
Otomatik işlemeyi tercih ediyorsanız, bir makro çalıştırmak en iyi seçiminizdir.
- Öncelikle, Word'de VBA düzenleyicisini tetiklemek için "Alt + F11" tuşlarına basın.
- Ardından "Normal"i tıklayın.
- Ardından “Ekle” sekmesine tıklayın ve menüsünden “Modül” seçeneğini seçin.
- Ardından modülü açmak için çift tıklayın ve aşağıdaki kodları yapıştırın:
Sub PrintDocWithoutComments()
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub
- Son olarak, "Çalıştır" ı tıklayın.
"Kopya Sayısı:=1" kod satırı, basılı kopyayı 1 olarak ayarlar. Kopya sayısını gerektiği gibi değiştirebilirsiniz.
Yöntem 3: İşaretlemeler Olmadan Birden Çok Belgeyi Toplu Yazdırma
Şimdi, işaretleme olmadan yazdırmanız gereken çok sayıda dosyanız varsa, aşağıdaki makro size zaman kazandıracaktır.
- Öncelikle, hedef belgelerin hepsini aynı klasöre koyun.
- Ardından, yöntem 2'deki adımları izleyerek makroyu kurun ve çalıştırın.
- Makroyu bununla değiştirin:
Sub BatchPrintDocsWithoutComments()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = InputBox("Enter folder path:")
strFile = Dir(strFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Set objDoc = ActiveDocument
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- Şimdi bir giriş kutusu var. Tüm hedef belgeleri sakladığınız klasör yolunu girin ve "Tamam"ı tıklayın. Yol dizesinin sonundaki "\ " işaretini unutmayın.
Belge Bozulmasıyla Başa Çıkın
Belge bozulması sık tekrarlanan bir tema olmuştur. Sonuç olarak, doktor kurtarma sahneye çıkmıştır. Word'de bozuk dosyaları kurtarmanıza yardımcı olan yerleşik bir işlev vardır. Ne yazık ki, bazen iyi çalışmıyor. Bu nedenle, işi yapmak için daha uygun bir araca ihtiyacınız var.
Yazar Tanıtımı:
Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. Excel kurtarma hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com



