sep0718 key driver.
*
* Changelog:
* 1-June-2010 LSF Initial version
*
*
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU Gener
Sub glkCurrentDocPageSetup()
Dim glkDoc As Document '定義變量
Set glkDoc = Application.ActiveDocument '設置為當前文檔
With glkDoc '設置文檔參數
With .PageSetup '設置【頁面設置】參數
.Orien