Növbəti məqalədə Word sənədinizi işarələmədən çap etməyin 3 sürətli yolunu sizə təqdim etməyə diqqət edəcəyik.
Əgər sənədiniz yenidən baxılmasını tələb edirsə, onda siz mütləq sənədinizdə hər cür işarələmə əldə edəcəksiniz. Onları ekranda göstərməməyin yolları var. Onları çap etməmək haqqında nə demək olar?
Cavab müsbətdir. Və bugünkü mövzumuz sizə məqsədə çatmaq üçün 3 sürətli və təsirli üsul təqdim etməyə həsr olunub.
Metod 1: Çap Seçimlərini Dəyişdirin
- Başlamaq üçün lentdə "Fayl" sekmesine klikləyin.
- Sonra "Çap et" əmrini vurun.
- Sonra "Parametrlər" bölməsinə keçin və ilk açılan qutuya klikləyin.
- Menyuda "Çap işarəsi" seçimini ləğv edin. Sağ tərəfdəki ön görünüşdə heç bir yerdə işarələmələri görməyəcəksiniz, bu, əldə edəcəyiniz dəqiq nəticədir.
- Nəhayət, printeri seçin və digər formatları təyin edin və "Çap et" düyməsini basın.
Metod 2: VBA kodlarından istifadə edin
Avtomatik emal etməyə üstünlük verdiyiniz halda, makro işlətmək ən yaxşı seçiminizdir.
- Əvvəlcə Word-də VBA redaktorunu işə salmaq üçün “Alt+ F11” düyməsini sıxın.
- Sonra "Normal" düyməsini basın.
- Sonra "Daxil et" sekmesini vurun və menyusunda "Modul" seçin.
- Sonra modulu açmaq üçün iki dəfə klikləyin və aşağıdakı kodları yapışdı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
- Nəhayət, "Çalıştır" düyməsini basın.
“Kopyalar:=1” kod sətri çap nüsxəsini 1-ə təyin edir. Siz surət nömrəsini tələb olunduğu kimi dəyişə bilərsiniz.
Metod 3: Birdən çox sənədləri işarələmədən toplu çap edin
İndi işarələmə olmadan çap etmək lazım olan çox sayda faylınız varsa, aşağıdakı makro sizin vaxtınıza qənaət edəcəkdir.
- Əvvəlcə bütün hədəf sənədləri eyni qovluğa qoyun.
- Sonra 2-ci üsuldakı addımları izləyən makronu quraşdırın və işə salın.
- Makronu bununla əvəz edin:
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
- İndi giriş qutusu var. Bütün hədəf sənədləri saxladığınız qovluğun yolunu daxil edin və “OK” düyməsini basın. Yol sətrindəki son “\” işarəsini unutmayın.
Sənəd korrupsiyasının öhdəsindən gəlmək
Sənəd korrupsiyası tez-tez təkrarlanan mövzu olmuşdur. Nəticə kimi, doc bərpası səhnəyə çıxdı. Word-də pozulmuş faylları bərpa etməyə kömək edən daxili funksiya var. Təəssüf ki, bəzən yaxşı işləmir. Beləliklə, işi yerinə yetirmək üçün daha uyğun bir alətə ehtiyacınız var.
Müəllif Giriş:
Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc Excel bərpası və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com



