资源新版在线天堂-桌下含校园污肉高h-坠落女教师-椎名由奈在线播放-六月色婷婷-六月丁香婷婷天天在线

VIP標識 上網做生意,首選VIP會員| 設為首頁| 加入桌面| | 手機版| RSS訂閱
食品伙伴網服務號
 

Word宏應用實例

放大字體  縮小字體 發布日期:2006-06-10
一、宏的錄制

  在這里舉一實例。例如,在Word 97中,要插入字符,則往往要到符號框中查找半天。對于一些常用的符號,如“¥”,便可以使用宏來使工作簡化。

  1.單擊“工具”選單中“宏”子選單,再單擊“錄制新宏”選項。

  2.給宏取名為“Yuan”,再單擊“鍵盤”。

  3.在彈出的對話框中指定快捷鍵,可指定為“Ctrl+Y”,再關閉該對話框回到“錄制宏”對話框。單擊“確定”按鈕啟動記錄器。

  4.運行“插入”選單中的“符號”子選單,從彈出的“符號”框中選擇“¥”,插入后再關閉。另外,也可以指定到工具欄,從彈出的“自定義”對話框中的“命令”欄中把“Normal.NewMacro1.Yuan”拖放到工具欄中。

  5.單擊“停止錄制”工具欄中的“停止錄制”按鈕。

  6.單擊“工具”選單中“宏”子選單,再單擊“宏”命令。

  7.選擇第二步中的宏名稱,再單擊“編輯”按鈕。

  這時我們可以從中看到以下代碼:

  Sub Yuan()

   Selection.InsertSymbol Font:=″楷體—GB2312″,CharacterNumber:=-27,Unicode:=True

  End Sub

  以后,當你需要插入字符“¥”時,只需按下快捷鍵“Ctrl+Y”,或者是在工具欄點擊“Normal.NewMacrol.Yuan”便可以了。

  二、宏的編輯

  宏錄制器將以上宏操作翻譯為Visual Basic代碼。但是,錄制宏時會受到一些限制。許多復雜的宏,例如,要用到循環語句,便無法錄制。為了提高錄制的宏的功能,就可能需要修改錄制到模塊中的代碼。

  具體操作為:單擊“工具”選單中“宏”子選單,再單擊“宏”命令。選擇第二步中的宏名稱,再單擊“編輯”按鈕。

  然后便加載Visual Basic編輯器,我們可以看到所錄制的宏自動生成的Visual Basic代碼。

  例如,在C:\My Document中有200個Word文檔,依次命名為“1.doc”,“2.doc”,“3.doc”,…“200.doc”,我們需要把文件格式改變為文本文件,即txt文件。

  先以1.doc為例,錄制一個宏,打開文檔,另存為txt文件,再關閉該活動文檔。生成的Visual Basic代碼如下:

  Sub Macro1()

   ChangeFileOpenDirectory ″C:\My document″

  Documents.Open FileName:=″1.doc″

  ActiveDocument.SaveAs FileName:=″1.txt″,FileFormat:=wdFormatText

  ActiveWindow.Close

  End Sub

  下一步便進行編輯,用一個循環語句依次打開各個文件,轉化后再關閉。代碼如下:

  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

  再次運行該宏,便可以輕松完成任務。宏的作用由此可略見一斑
 
[ 網刊訂閱 ]  [ 食品專題搜索 ]  [ ]  [ 告訴好友 ]  [ 打印本文 ]  [ 關閉窗口 ] [ 返回頂部 ]

 

 
推薦圖文
推薦食品專題
點擊排行
 
 
Processed in 0.023 second(s), 18 queries, Memory 0.88 M
主站蜘蛛池模板: 一本之道高清www在线观看| 青青青青草| 欧美日韩高清一区二区三区| 亚洲XXX午休国产熟女屁| 高清毛片一区二区三区| 嗯好大好猛皇上好深用力| 野花日本大全免费高清完整版 | 中文字幕日本久久2019| 灰原哀被啪漫画禁漫| 亚洲国产在线精品国偷产拍| 国产亚洲日韩欧美视频| 亚洲国产日韩a精品乱码| 国产在线精品一区二区网站免费| 羞羞答答的免费视频在线观看| 国产人妻人伦精品9| 亚洲精品嫩草研究院久久| 精品亚洲欧美中文字幕在线看| 亚洲一日韩欧美中文字幕在线| 精品一品国产午夜福利视频| 伊人电院网| 美女屁股软件| jiucao在线观看精品| 三级成年网站在线观看| 国产精品免费大片| 亚洲人成网站在线观看90影院| 久久久久久亚洲精品影院| 99久久精品久久久| 色悠悠电影网| 国产中文在线| 中文字幕一区久久久久| 欧美性xxxx18| 国产精品久久久久久久久爆乳 | 2019久久视频这里有精品15| 蜜臀AV中文字幕熟女人妻| YELLOW视频在线观看大全| 色色男_免费| 国家产午夜精品无人区| 最新国产精品福利2020| 日韩精品亚洲专区在线影院 | 漂亮的av女演员| 国产日韩精品一区二区在线观看|