Word VBA教程:Visual Basic 命令对照表 G

ABCDEFGHIJKLMNOPRSTUVWY

G  
GetAddInID(name) x = Addins(name).Index
GetAddInName$(num) x = Addins(num).Name
GetAddress$() x = Application.GetAddress
GetAttr(filename) GetAttr(filename)
GetAutoCorrect$(name) x = AutoCorrect.Entries(name).Value
GetAutoCorrectException$() x = AutoCorrect.FirstLetterExceptions(num).Name

x = AutoCorrect.TwoInitialCapsExceptions(num).Name

GetAutoText$() x = ActiveDocument.AttachedTemplate.AutoTextEntries(name).Value
GetBookmark$(name) x = ActiveDocument.Bookmarks(name).Range.Text
GetCurValues Dialogs(WdWordDialog).Update
GetDirectory$() x =WordBasic.[GetDirectory$]()
GetDocumentProperty(), GetDocumentProperty$() x = ActiveDocument.CustomDocumentProperties(name).Value

'或

x = ActiveDocument.BuiltInDocumentProperties(name).Value

GetDocumentVar$(name) x = ActiveDocument.Variables(name).Value
GetDocumentVarName$(num) x = ActiveDocument.Variables(num).Name
GetFieldData$() x = Selection.Fields(1).Data
GetFormResult(), GetFormResult$() x = ActiveDocument.FormFields(name).Result
GetMergeField$() x = ActiveDocument.MailMerge.DataSource.DataFields(name).Value
GetPrivateProfileString$() x = System.PrivateProfileString(filename, section, key)
GetProfileString$() x = System.ProfileString(section, key)
GetSelEndPos() x = Selection.End
GetSelStartPos() x = Selection.Start
GetSystemInfo$(21)

GetSystemInfo$(22)

GetSystemInfo$(23)

GetSystemInfo$(24)

GetSystemInfo$(25)

GetSystemInfo$(26)

GetSystemInfo$(27)

GetSystemInfo$(28)

GetSystemInfo$(29)

GetSystemInfo$(30)

GetSystemInfo$(31)

GetSystemInfo$(32)

x = System.OperatingSystem

x = System.ProcessorType

'无

x = System.Version

'无

x = System.FreeDiskSpace

'无

x = System.MathCoprocessorInstalled

x = System.Country

x = System.LanguageDesignation

x = System.VerticalResolution

x = System.HorizontalResolution

值 512 至 526 仅用于 Macintosh 系统。

GetText$(Pos1, Pos2) x = ActiveDocument.Range(Pos1, Pos2).Text
GoBack Application.GoBack
Goto GoTo
GoToAnnotationScope Selection.Comments(1).Scope.Select
GoToHeaderFooter If Selection.HeaderFooter.IsHeader = True Then

    ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter

Else

    ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

End If

GoToNextAnnotation

GoToNextEndnote

GoToNextFootnote

GoToNextPage

GoToNextSection

GoToNextSubdocument

Selection.GoToNext(wdGoToComment)

Selection.GoToNext(wdGoToEndnote)

Selection.GoToNext(wdGoToFootnote)

Selection.GotoNext(wdGoToPage)

Selection.GotoNext(wdGoToSection)

Selection.NextSubdocument

GoToPreviousItem Selection.GoTo What:=WdGoToItem, Which:=wdGoToPrevious
GroupBox 框架控件
GrowFont Selection.Font.Grow
GrowFontOnePoint Selection.Font.Size = Selection.Font.Size + 1

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号