宏命令的便捷應用

耿向川

摘 要：本文利用宏命令編寫宏代碼簡化繁瑣操作，重點介紹了EmEditor文本編輯器的使用。

關鍵詞：宏命令EmEditor文本編輯

在Word、Excel等應用程序中內置了宏的編輯和運行環境，在日常的辦公應用中，如果遇到執行一些相同操作步驟等情況時，可以編寫宏代碼來簡化操作。那么，我們可以利用EmEditor文本編輯器來完成一些簡化操作。

一、利用EmEditor宏快速輸入個人信息

步驟1：打開EmEditor，輸入以下內容：

Document.selection.Text="地址：

山西省XX市XX縣XX小區XX單元XX室"輸入你的地址。

Document.selection.NewLine1回車，下同

Document.selection.Text="姓名：XXX"輸入你的姓名

Document.selection.NewLine1

Document.selection.Text="郵編：XXXXXX"輸入你的郵編

Document.selection.NewLine1

Document.selection.Text=

"身份證號：XXXXXXXXXXXXXXXXXX"輸入你的身份證號

Document.selection.NewLine1

Document.selection.Text="QQ號：XXXXXXXXXX"輸入你的QQ號

Document.selection.NewLine1

輸入完成后，單擊菜單欄中的“文件→保存”命令，打開“另存為”窗口，選擇保存位置（如E：＼我的宏），然后在文件名后邊的文本框內輸入“個人信息.vbs”，最后點擊“保存”按鈕。[1]

步驟2：單擊菜單欄中的“宏→自定義”命令，打開“自定義宏”窗口，然后點擊“新建”按鈕，瀏覽找到剛才保存的“個人信息.vbs”文件，最后單擊“確定”按鈕，完成宏代碼的添加。[2]

如果以后需要添加個人信息時，只需要單擊菜單欄中的“宏→個人信息”命令，就可以完成個人信息的添加了。

二、利用EmEditor宏快速新建文本文件

我們在新建一個文本文件時，總是要先選擇文件的保存位置及文件名對該文件進行保存，這個過程很繁瑣，利用EmEditor宏可以很輕松地完成在指定位置建立指定文件名的文本文件。下面以“E：＼教案”文件夾下新建一個“我的教案”的文本文件為例來做具體說明：

步驟1：復制“E：＼我的宏”文件夾下的“個人信息”VBS文件，將復制的文件重命名為“我的教案”，右擊該文件，在出現的右鍵菜單欄中，單擊“Edit”命令，打開該文件，將其內容替換為：

Option Explict '強制變量聲明

dim WshShell，fso，f

Set WshShell=CreateObject（"WScript.Shell"）

set fso=createobject（"scripting.filesystemobject"）

if fso.fileexists（"E：＼教案＼我的教案.txt"）then''判斷要新建的文本文件是否存在'

WshShell.Run''''''E：＼教案＼我的教案.txt'''''''存在就直接打開

else

set f=fso.createtextfile（"E：＼教案＼我的教案.txt"）'不存在時，就新建一個

WshShell.Run''''''E：＼教案＼我的教案.txt''''''打開該文件

End if

最后保存。

步驟2：單擊菜單欄中的“宏→自定義”命令，打開“自定義宏”窗口，然后點擊“新建”按鈕，瀏覽找到剛才保存的“我的教案.vbs”文件，最后單擊“確定”按鈕，完成宏代碼的添加。

三、利用EmEditor宏快速壓縮文件

我們在通過QQ等軟件傳送一個大容量文件時，通常需要對文件進行壓縮以方便傳送，為了操作簡便，我們可以在EmEditor界面中調用WinRAR對相關文件進行壓縮，還是以"E：＼教案"文件夾為例。

步驟1：將一個VBS文件保存到“E：＼我的宏”文件夾下，起文件名為“壓縮”，內容如下：

dim WshShell

Set WshShell=CreateObject（"WScript.Shell"）

WshShell.Run''''''E：＼我的宏＼壓縮.bat''''''

步驟2：在與第一步相同的位置新建一個批處理文件“壓縮”，其內容如下：

cd..

cd..

d：

cd D：＼Program Files＼WinRAR＼

WinRAR a-r H：＼論文 E：＼ 教案＼*.*

命令說明：（1）前三句命令的含義是進入D盤根目錄中。（2）第四句是進入WinRAR的安裝目錄。（3）最后一句的含義是將"E：＼ 教案"文件夾下的所有內容壓縮成"教案.RAR"文件，并保存到H盤根目錄下。

四、利用EmEditor宏快速打開文本文件

有時候，我們在編輯文本文件時，一次不可能完成所有的工作，下次還要打開同一個文件，需要不停地轉換文件，直到找到相關的文件為止。

步驟1：用EmEditor新建一個VBS文件，文件名為“打開指定文件”，其內容如下：

dim WshShell

Set WshShell=CreateObject（"WScript.Shell"）

WshShell.Run''''''E：＼教案＼教學計劃.txt''''''

步驟2：將這個文件保存到“E：＼我的宏”文件夾下，單擊菜單欄中的“宏→自定義”命令，打開“自定義宏”窗口，然后點擊“新建”按鈕，瀏覽找到剛才保存的“打開指定文本.vbs”文件，最后單擊“確定”按鈕，完成宏代碼的添加。

這樣當我們啟動EmEditor后，然后單擊菜單欄中的“宏→打開指定文本”命令，就可以打開"E：＼教案"文件夾下的文本文件"教學計劃"。

參考文獻

[1]鳳凰高新教育編著.Office完全自學教程[M].北京大學出版社，2012.

[2]楊陽編著.Office高效辦公實戰技巧[M].北京希望電子出版社，2013.