Visual Basic Equivalents D

aa211964(v=office.11).mdaa211965(v=office.11).mdaa211966(v=office.11).mdDaa211968(v=office.11).mdaa211969(v=office.11).mdaa211970(v=office.11).mdaa211971(v=office.11).mdaa211972(v=office.11).mdaa211973(v=office.11).mdaa211973(v=office.11).mdaa211973(v=office.11).mdaa211974(v=office.11).mdaa211975(v=office.11).mdaa212123(v=office.11).mdaa212123(v=office.11).mdaa212145(v=office.11).mdaa212149(v=office.11).mdaa212153(v=office.11).mdaa212156(v=office.11).mdaa212156(v=office.11).mdaa212159(v=office.11).mdaa212159(v=office.11).md

D
Date$() Date
DateSerial() DateSerial
DateValue() DateValue
Day() Day
Days360() DateDiff
DDEExecute channel, command DDEExecute channel, command
chan = DDEInitiate (application, topic) chan = DDEInitiate (application, topic)
DDEPoke channel, item, data DDEPoke channel, item, data
data = DDERequest$(channel, item) data = DDERequest (channel, item)
DDETerminate channel DDETerminate channel
DDETerminateAll DDETerminateAll
Declare Declare
DefaultDir$() x = DefaultFilePath (WdDefaultFilePath)
DeleteAddIn name Addins(name).Delete
DeleteBackWord Selection.Delete Unit:=wdWord, Count:=-1
DeleteButton CommandBars(name).Controls(num).Delete
DeleteDocumentProperty name ActiveDocument.CustomDocumentProperties(name).Delete
DeleteWord Selection.Words(1).Delete
DemoteList Selection.Range.ListFormat.ListOutdent
DemoteToBodyList Selection.Paragraphs(1).OutlineDemoteToBody
Dialog, Dialog() Dialogs(WdWordDialog).Show
DialogEditor ShowVisualBasicEditor = True
Dim Dim
DisableAutoMacros WordBasic .DisableAutoMacros
DisableInput Application.EnableCancelKey = WdEnableCancelKey
DlgControlId() WordBasic dynamic dialog functionality has been replaced by custom user forms. Refer to the topics in Microsoft Forms Help.
DlgEnable, DlgEnable()
DlgFilePreview, DlgFilePreview$()
DlgFocus, DlgFocus$()
DlgListBoxArray, DlgListBoxArray()
DlgLoadValues, DlgLoadValues()
DlgSetPicture
DlgStoreValues
DlgText, DlgText$()
DlgUpdateFilePreview
DlgValue, DlgValue()
DlgVisible, DlgVisible()
DocClose ActiveWindow.Close
DocMaximize, DocMaximize() ActiveWindow.WindowState = wdWindowStateMaximize
DocMinimize, DocMinimize() ActiveWindow.WindowState = wdWindowStateMinimize
DocMove HorizPos, VertPos With ActiveWindow

.Top = VertPos

.Left = HorizPos

End With

DocRestore ActiveWindow.WindowState = wdWindowStateNormal
DocSize width, height With ActiveWindow

.Height = width

.Width = height

End With

DocSplit, DocSplit() ActiveWindow.SplitVertical = 50

x = ActiveWindow.SplitVertical

DocumentHasMisspellings() x = ActiveDocument.SpellingErrors .Count
DocumentPropertyExists() ' enumerate the DocumentProperties collection

For Each aProp In ActiveDocument.CustomDocumentProperties

If aProp.Name = name Then itExists = True

Next aProp

DocumentPropertyName$() x = ActiveDocument.CustomDocumentProperties(num).Name

' or

x = ActiveDocument.BuiltInDocumentProperties(num).Name

DocumentPropertyType() x = ActiveDocument.CustomDocumentProperties(name).Type
DocumentProtection() x = ActiveDocument.ProtectionType
DocumentStatistics FileName, Directory, Template, Title, Created, LastSaved, LastSavedBy, Revision, Time, Printed, Pages, Words, Characters, Paragraphs, Lines, FileSize With ActiveDocument

var1 = .Name

var2 = .Path

var3 = .BuiltInDocumentProperties (wdPropertyTemplate)

var4 = .BuiltInDocumentProperties(wdPropertyTitle)

var5 = .BuiltInDocumentProperties(wdPropertyTimeCreated)

var6 = .BuiltInDocumentProperties(wdPropertyTimeLastSaved)

var7 = .BuiltInDocumentProperties(wdPropertyLastAuthor)

var8 = .BuiltInDocumentProperties(wdPropertyRevision)

var9 = .BuiltInDocumentProperties(wdPropertyVBATotalEdit)

var10 = .BuiltInDocumentProperties(wdPropertyTimeLastPrinted)

var11 = .BuiltInDocumentProperties(wdPropertyPages)

var12 = .BuiltInDocumentProperties(wdPropertyWords)

var13 = .BuiltInDocumentProperties(wdPropertyCharacters)

var14 = .BuiltInDocumentProperties(wdPropertyParas)

var15 = .BuiltInDocumentProperties(wdPropertyLines)

var16 = .BuiltInDocumentProperties(wdPropertyBytes)

End With

DocWindowHeight ActiveWindow.Height = height
DocWindowPosLeft ActiveWindow.Left = horizpos
DocWindowPosTop ActiveWindow.Top = vertpos
DocWindowWidth ActiveWindow.Width = width
DoFieldClick Selection.Fields(1).DoClick
DOSToWin$() x = WordBasic .[DOSToWin$](StringToTranslate)
DottedUnderline, DottedUnderline() Selection.Font.UnderLine = wdUnderlineDotted

x = Selection.Font.UnderLine

DoubleUnderline, DoubleUnderline() Selection.Font.UnderLine = wdUnderlineDouble

x = Selection.Font.UnderLine

Drawing object statements and functions Use the properties and methods of the following objects: Shape , Shapes , and ShapeRange .
DropDownFormField ActiveDocument.FormFields.Add Range:=range, Type:=wdFieldFormDropDown
DropListBox ComboBox control

See Also | Visual Basic Equivalents A | Visual Basic Equivalents B | Visual Basic Equivalents C | Visual Basic Equivalents E | Visual Basic Equivalents F | Visual Basic Equivalents for WordBasic Commands | Visual Basic Equivalents G | Visual Basic Equivalents H | Visual Basic Equivalents I | Visual Basic Equivalents J Through L | Visual Basic Equivalents M | Visual Basic Equivalents N | Visual Basic Equivalents O Through P | Visual Basic Equivalents R | Visual Basic Equivalents S | Visual Basic Equivalents T | Visual Basic Equivalents U Through V | Visual Basic Equivalents W Through Y