一、宏的錄制
在這里舉一實(shí)例。例如,在Word 97中,要插入字符,則往往要到符號(hào)框中查找半天。對(duì)于一些常用的符號(hào),如“¥”,便可以使用宏來使工作簡化。
1.單擊“工具”選單中“宏”子選單,再單擊“錄制新宏”選項(xiàng)。
2.給宏取名為“Yuan”,再單擊“鍵盤”。
3.在彈出的對(duì)話框中指定快捷鍵,可指定為“Ctrl+Y”,再關(guān)閉該對(duì)話框回到“錄制宏”對(duì)話框。單擊“確定”按鈕啟動(dòng)記錄器。
4.運(yùn)行“插入”選單中的“符號(hào)”子選單,從彈出的“符號(hào)”框中選擇“¥”,插入后再關(guān)閉。另外,也可以指定到工具欄,從彈出的“自定義”對(duì)話框中的“命令”欄中把“Normal.NewMacro1.Yuan”拖放到工具欄中。
5.單擊“停止錄制”工具欄中的“停止錄制”按鈕。
6.單擊“工具”選單中“宏”子選單,再單擊“宏”命令。
7.選擇第二步中的宏名稱,再單擊“編輯”按鈕。
這時(shí)我們可以從中看到以下代碼:
Sub Yuan()
Selection.InsertSymbol Font:=″楷體—GB2312″,CharacterNumber:=-27,Unicode:=True
End Sub
以后,當(dāng)你需要插入字符“¥”時(shí),只需按下快捷鍵“Ctrl+Y”,或者是在工具欄點(diǎn)擊“Normal.NewMacrol.Yuan”便可以了。
二、宏的編輯
宏錄制器將以上宏操作翻譯為Visual Basic代碼。但是,錄制宏時(shí)會(huì)受到一些限制。許多復(fù)雜的宏,例如,要用到循環(huán)語句,便無法錄制。為了提高錄制的宏的功能,就可能需要修改錄制到模塊中的代碼。
具體操作為:單擊“工具”選單中“宏”子選單,再單擊“宏”命令。選擇第二步中的宏名稱,再單擊“編輯”按鈕。
然后便加載Visual Basic編輯器,我們可以看到所錄制的宏自動(dòng)生成的Visual Basic代碼。
例如,在C:\My Document中有200個(gè)Word文檔,依次命名為“1.doc”,“2.doc”,“3.doc”,…“200.doc”,我們需要把文件格式改變?yōu)槲谋疚募,即txt文件。
先以1.doc為例,錄制一個(gè)宏,打開文檔,另存為txt文件,再關(guān)閉該活動(dòng)文檔。生成的Visual Basic代碼如下:
Sub Macro1()
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=″1.doc″
ActiveDocument.SaveAs FileName:=″1.txt″,FileFormat:=wdFormatText
ActiveWindow.Close
End Sub
下一步便進(jìn)行編輯,用一個(gè)循環(huán)語句依次打開各個(gè)文件,轉(zhuǎn)化后再關(guān)閉。代碼如下:
Sub Macro1()
dim i
for i=1 to 200
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=i & ″.doc″
ActiveDocument.SaveAs FileName:
=i & ″.txt″,
FileFormat:=wdFormatText
ActiveWindow.Close
next i
End Sub
再次運(yùn)行該宏,便可以輕松完成任務(wù)。宏的作用由此可略見一斑
在這里舉一實(shí)例。例如,在Word 97中,要插入字符,則往往要到符號(hào)框中查找半天。對(duì)于一些常用的符號(hào),如“¥”,便可以使用宏來使工作簡化。
1.單擊“工具”選單中“宏”子選單,再單擊“錄制新宏”選項(xiàng)。
2.給宏取名為“Yuan”,再單擊“鍵盤”。
3.在彈出的對(duì)話框中指定快捷鍵,可指定為“Ctrl+Y”,再關(guān)閉該對(duì)話框回到“錄制宏”對(duì)話框。單擊“確定”按鈕啟動(dòng)記錄器。
4.運(yùn)行“插入”選單中的“符號(hào)”子選單,從彈出的“符號(hào)”框中選擇“¥”,插入后再關(guān)閉。另外,也可以指定到工具欄,從彈出的“自定義”對(duì)話框中的“命令”欄中把“Normal.NewMacro1.Yuan”拖放到工具欄中。
5.單擊“停止錄制”工具欄中的“停止錄制”按鈕。
6.單擊“工具”選單中“宏”子選單,再單擊“宏”命令。
7.選擇第二步中的宏名稱,再單擊“編輯”按鈕。
這時(shí)我們可以從中看到以下代碼:
Sub Yuan()
Selection.InsertSymbol Font:=″楷體—GB2312″,CharacterNumber:=-27,Unicode:=True
End Sub
以后,當(dāng)你需要插入字符“¥”時(shí),只需按下快捷鍵“Ctrl+Y”,或者是在工具欄點(diǎn)擊“Normal.NewMacrol.Yuan”便可以了。
二、宏的編輯
宏錄制器將以上宏操作翻譯為Visual Basic代碼。但是,錄制宏時(shí)會(huì)受到一些限制。許多復(fù)雜的宏,例如,要用到循環(huán)語句,便無法錄制。為了提高錄制的宏的功能,就可能需要修改錄制到模塊中的代碼。
具體操作為:單擊“工具”選單中“宏”子選單,再單擊“宏”命令。選擇第二步中的宏名稱,再單擊“編輯”按鈕。
然后便加載Visual Basic編輯器,我們可以看到所錄制的宏自動(dòng)生成的Visual Basic代碼。
例如,在C:\My Document中有200個(gè)Word文檔,依次命名為“1.doc”,“2.doc”,“3.doc”,…“200.doc”,我們需要把文件格式改變?yōu)槲谋疚募,即txt文件。
先以1.doc為例,錄制一個(gè)宏,打開文檔,另存為txt文件,再關(guān)閉該活動(dòng)文檔。生成的Visual Basic代碼如下:
Sub Macro1()
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=″1.doc″
ActiveDocument.SaveAs FileName:=″1.txt″,FileFormat:=wdFormatText
ActiveWindow.Close
End Sub
下一步便進(jìn)行編輯,用一個(gè)循環(huán)語句依次打開各個(gè)文件,轉(zhuǎn)化后再關(guān)閉。代碼如下:
Sub Macro1()
dim i
for i=1 to 200
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=i & ″.doc″
ActiveDocument.SaveAs FileName:
=i & ″.txt″,
FileFormat:=wdFormatText
ActiveWindow.Close
next i
End Sub
再次運(yùn)行該宏,便可以輕松完成任務(wù)。宏的作用由此可略見一斑