資源描述：
《word怎么添加和取消頁眉頁腳》由會員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、word怎么添加和取消頁眉頁腳一．如何添加頁眉頁腳大家都知道有些時候?yàn)榱俗屛覀兊奈臋n顯得更加精致，會在文檔每頁的上面或者下面加上公司的名字或者文檔主題，更或者是頁碼、日期等，下面小編就向大家簡單介紹一下word添加頁眉頁腳的方法。1首先我們新建一個文檔，或者大家可以打開一個想要編輯的文檔。2.我們在菜單欄點(diǎn)擊菜單“插入”，之后點(diǎn)擊“頁眉”或者“頁腳”。3.如果大家覺得這個方法比較麻煩的話，也可以直接雙擊頁面最上面或者最下面，之后輸入文字就可以了。4.之后我們點(diǎn)擊菜單欄的“設(shè)計(jì)”菜單，可以設(shè)計(jì)頁眉頁腳的位置。5.很多時候我們會把首頁弄成封面，這個時候就不能有頁眉頁腳了，我們只要點(diǎn)擊設(shè)計(jì)菜單，
2、在首頁不同前面打鉤就可以了。6.如果想要在頁眉頁腳插入日期，點(diǎn)擊菜單“日期與時間”選擇相應(yīng)的格式就可以了。7.最后如果大家想要在頁眉頁腳插入頁碼，點(diǎn)擊菜單“頁碼”選擇相應(yīng)的格式就可以了。二．利用宏刪除頁眉頁腳有許多人剛接觸WORD的新手，常常會遇到的問題就是怎樣刪除頁眉頁腳，當(dāng)然一個Word里面刪除頁眉頁腳不難，但有幾百多個Word里面都有頁眉頁腳要你刪除，那就難到不少人了，下面將針對這一問題，看看我是怎么利用宏批量刪除多個Word頁眉頁腳的。1.假如我手上有500個word文檔需要刪除頁眉頁腳2.先把需要刪除頁眉頁腳的500個word文檔放在一個文件夾下，然后打開其中一個文檔3.在打開的
3、文檔中，選擇在“工具”菜單中選擇“宏”--“宏”或者在“視圖”里選擇“宏”-“查看宏”。4.隨后彈出“宏”對話框，在宏名中輸入"Application"，最后點(diǎn)擊"創(chuàng)建"按鈕5.隨后彈出“Microsoftvisualbasic”設(shè)計(jì)，在編輯處輸入如下代碼Sub批量刪除Word頁眉頁腳()?Application.ScreenUpdating=False?DimMyPathAsString,iAsInteger,myDocAsDocument?WithApplication.FileDialog(msoFileDialogFolderPicker)??.Title="選擇要處理目標(biāo)文件夾"
4、&"——(刪除里面所有Word文檔的頁眉頁腳)"??If.Show=-1Then???MyPath=.SelectedItems(1)??Else???ExitSub??EndIf?EndWith?WithApplication.FileSearch??.LookIn=MyPath??.FileType=msoFileTypeWordDocuments??If.Execute>0Then???Fori=1To.FoundFiles.Count????SetmyDoc=Documents.Open(FileName:=.FoundFiles(i))???'B可以替換的宏'以下是處理格式所錄制
5、的宏，可根據(jù)所需錄制IfActiveWindow.View.SplitSpecial<>wdPaneNoneThen????ActiveWindow.Panes(2).Close??EndIf??IfActiveWindow.ActivePane.View.Type=wdNormalViewOrActiveWindow._????ActivePane.View.Type=wdOutlineViewThen????ActiveWindow.ActivePane.View.Type=wdPrintView??EndIf??ActiveWindow.ActivePane.View.SeekVie
6、w=wdSeekCurrentPageHeader??Selection.WholeStory??Selection.DeleteUnit:=wdCharacter,Count:=1??Selection.WholeStory??WithSelection.ParagraphFormat????.Borders(wdBorderLeft).LineStyle=wdLineStyleNone????.Borders(wdBorderRight).LineStyle=wdLineStyleNone????.Borders(wdBorderTop).LineStyle=wdLineStyleNo
7、ne????.Borders(wdBorderBottom).LineStyle=wdLineStyleNone????With.Borders??????.DistanceFromTop=1??????.DistanceFromLeft=4??????.DistanceFromBottom=1??????.DistanceFromRight=4??????.Shadow=False????EndWith??EndWit
