在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕，這個(gè)問題是我們很多人都很困惑的一個(gè)問題，在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕是我們非常常用的一個(gè)東西，也是我們工作和學(xué)習(xí)中必不可少的一個(gè)數(shù)據(jù)公式，那么具體我們要怎么做呢？下面就來看看這篇在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕的文章吧！

2015年開始都提倡節(jié)能減排了，作為一個(gè)公司也要從節(jié)約、節(jié)能開始，那么做為一名excel小編，今天我們就要給大家講一下，在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕。

首先我們要編輯宏：

第一步:啟動(dòng)Excel 2003(其他版本請仿照操作)，執(zhí)行工具→宏→Visual Basic編輯器命令，進(jìn)入Visual Basic編輯狀態(tài)(如圖1)。

圖1

第二步:在右側(cè)的工程資源管理器區(qū)域中，選中VBAProject(PERNOSAL.XLS)選項(xiàng)，執(zhí)行插入→模塊命令，插入一個(gè)新模塊(模塊1)。

小提示

PERNOSAL.XLS叫做個(gè)人宏工作簿，第一次使用宏功能時(shí)，需要進(jìn)入下述操作，添加個(gè)人宏工作簿:在Excel中，執(zhí)行工具→宏→錄制新宏命令，打開錄制新宏對話框(如圖2)，輸入一個(gè)名稱，然后選擇將其保存在個(gè)人宏工作簿中，確定返回，隨便做一下編輯操作，然后按停止錄制工具欄上的停止錄制按鈕，系統(tǒng)即可自動(dòng)添加個(gè)人宏工作簿。

圖2

第三步:雙擊模塊1進(jìn)入代碼輸入?yún)^(qū)域，將下述代碼輸入其中:

Sub dy()

On Error Resume Next

x = ExecuteExcel4Macro("Get.Document(50)")

For i = 1 To Int(x / 2) + 1

ActiveWindow.SelectedSheets.PrintOut From:=2 * i – 1, To:=2 * i – 1

Next i

MsgBox "請將打印出的紙張反向裝入紙槽中", vbOKOnly, "打印另一面"

For j = 1 To Int(x / 2) + 1

ActiveWindow.SelectedSheets.PrintOut From:=2 * j, To:=2 * j

Next j

End Sub

第四步:輸入完成后，關(guān)閉Visual Basic編輯窗口返回。

然后我們要添加按鈕

第一步:執(zhí)行工具→自定義命令，打開自定義對話框(如圖3)。

圖3

第二步:切換到命令標(biāo)簽下，在類別下面選中宏選項(xiàng)，然后將右側(cè)命令下面的自定義按鈕選項(xiàng)拖到工具欄合適位置上，添加一個(gè)按鈕。

第三步:單擊更改所選內(nèi)容按鈕，在隨后展開的快捷菜單中，在命名右側(cè)的方框中輸入按鈕名稱(如雙面打印，并選中總是用文字選項(xiàng)。

第四步:在不關(guān)閉自定義對話框的情況下，右擊工具欄上剛才添加的雙面打印按鈕(參見圖3)，在隨后彈出的快捷菜單中，選擇指定宏選項(xiàng)，打開指定宏對話框(如圖4)。

圖4

第五步:選中上面編輯的宏，確定退出，再關(guān)閉自定義對話框返回Excel編輯狀態(tài)。

最后雙面打印

啟動(dòng)Excel，打開需要雙面打印的工作簿文件，單擊雙面打印按鈕，系統(tǒng)先將奇數(shù)頁打印出來，然后彈出如圖5所示的提示框，將打印的紙張反向裝入打印機(jī)的紙槽中，按下確定按鈕，即可將偶數(shù)頁打印到另一面上，達(dá)到雙面打印的目的。

圖5

小提示

如果在打印過程中，出現(xiàn)夾紙現(xiàn)象，致使部分頁面損壞，可以通過執(zhí)行文件→打印命令，打開打印對話框，用手動(dòng)的方法將少量損壞的頁單獨(dú)打印出來即可。

以上就是在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕全部內(nèi)容了，希望大家看完有所啟發(fā)，對自己的工作生活有所幫助，想要了解更多跟在excel中如何自己手動(dòng)添加一個(gè)雙面打印按鈕請關(guān)注我們文章營銷官網(wǎng)！

推薦閱讀