Class Options (Word VBA)

The class Options represents application and document options in Word. Many of the properties for the Options object correspond to items in the Options dialog box.

Set

To use a Options class variable it first needs to be instantiated, for example

Dim opts as Options
Set opts = Options

Options class variables can be set using the Application.Options procedure.

Themes

Some procedures in this class have been grouped together in themes and are described on separate theme pages

Add with its procedures AddBiDirectionalMarksWhenSavingTextFile, AddControlCharacters and AddHebDoubleQuote
Format with its procedures ApplyFarEastFontsToAscii, AutoFormatApplyBulletedLists, AutoFormatApplyFirstIndents, AutoFormatApplyHeadings, AutoFormatApplyLists, AutoFormatApplyOtherParas, AutoFormatAsYouTypeApplyBorders, AutoFormatAsYouTypeApplyBulletedLists, AutoFormatAsYouTypeApplyClosings, AutoFormatAsYouTypeApplyDates, AutoFormatAsYouTypeApplyFirstIndents, AutoFormatAsYouTypeApplyHeadings, AutoFormatAsYouTypeApplyNumberedLists, AutoFormatAsYouTypeApplyTables, AutoFormatAsYouTypeAutoLetterWizard, AutoFormatAsYouTypeDefineStyles, AutoFormatAsYouTypeDeleteAutoSpaces, AutoFormatAsYouTypeFormatListItemBeginning, AutoFormatAsYouTypeInsertClosings, AutoFormatAsYouTypeInsertOvers, AutoFormatAsYouTypeMatchParentheses, AutoFormatAsYouTypeReplaceFarEastDashes, AutoFormatAsYouTypeReplaceFractions, AutoFormatAsYouTypeReplaceOrdinals, AutoFormatAsYouTypeReplacePlainTextEmphasis, AutoFormatAsYouTypeReplaceQuotes, AutoFormatAsYouTypeReplaceSymbols, AutoFormatDeleteAutoSpaces, AutoFormatMatchParentheses, AutoFormatPlainTextWordMail, AutoFormatPreserveStyles, AutoFormatReplaceFarEastDashes, AutoFormatReplaceFractions, AutoFormatReplaceOrdinals, AutoFormatReplacePlainTextEmphasis, AutoFormatReplaceQuotes, AutoFormatReplaceSymbols, BibliographyStyle, CommentsColor, DefaultBorderColor, DefaultBorderColorIndex, DefaultBorderLineStyle, DefaultBorderLineWidth, DefaultHighlightColorIndex, DefaultOpenFormat, DeletedCellColor, DeletedTextColor, DiacriticColorVal, FormatScanning, InsertedCellColor, InsertedTextColor, MarginAlignmentGuides, MergedCellColor, MoveFromTextColor, MoveToTextColor, PasteAdjustParagraphSpacing, PasteAdjustTableFormatting, PasteAdjustWordSpacing, PasteFormatBetweenDocuments, PasteFormatBetweenStyledDocuments, PasteFormatFromExternalSource, PasteFormatWithinDocument, PasteSmartStyleBehavior, PromptUpdateStyle, RevisedLinesColor, RevisedPropertiesColor, SplitCellColor, UpdateStyleListBehavior, UseDiffDiacColor and UseNormalStyleForList
Display/Show with its procedures DisplayAlignmentGuides, DisplayGridLines, DisplayPasteOptions, ShowControlCharacters, ShowDevTools, ShowDiacritics, ShowFormatError, ShowMarkupOpenSave, ShowReadabilityStatistics and ShowSelectionFloaties
Enable with its procedures EnableHangulHanjaRecentOrdering, EnableLegacyIMEMode, EnableLiveDrag, EnableLivePreview, EnableMisusedWordsDictionary, EnableProofingToolsAdvertisement and EnableSound
Print with its procedures PrintBackground, PrintBackgrounds, PrintComments, PrintDraft, PrintDrawingObjects, PrintEvenPagesInAscendingOrder, PrintFieldCodes, PrintHiddenText, PrintOddPagesInAscendingOrder, PrintProperties, PrintReverse, RevisionsBalloonPrintOrientation, UpdateFieldsAtPrint, UpdateFieldsWithTrackedChangesAtPrint, UpdateLinksAtPrint and WarnBeforeSavingPrintingSendingMarkup

Properties

AlertIfNotDefault returns or sets a Boolean that is True if users are notified if Word is not the default program for viewing and editing documents.

Options.AlertIfNotDefault = True

AllowAccentedUppercase true if accents are retained when a French language character is changed to uppercase.

Options.AllowAccentedUppercase = True

AllowClickAndTypeMouse true if Click and Type functionality is enabled.

Options.AllowClickAndTypeMouse = True

AllowCoAuthoringOnFilesWithMacros

Options.AllowCoAuthoringOnFilesWithMacros = True

AllowCombinedAuxiliaryForms true if Microsoft Word ignores auxiliary verb forms when checking spelling in a Korean language document.

Options.AllowCombinedAuxiliaryForms = True

AllowCompoundNounProcessing true if Microsoft Word ignores compound nouns when checking spelling in a Korean language document.

Options.AllowCompoundNounProcessing = True

AllowDragAndDrop true if dragging can be used to move or copy a selection.

Options.AllowDragAndDrop = True

AllowOpenInDraftView returns or sets a Boolean that represents whether to allow users to open documents in draft view.

Options.AllowOpenInDraftView = True

AllowPixelUnits true if Microsoft Word uses pixels as the default unit of measurement for HTML features that support measurements.

Options.AllowPixelUnits = True

AllowReadingMode true indicates that Microsoft Word opens documents in Reading Layout view.

Options.AllowReadingMode = True

AnimateScreenMovements true if Word animates mouse movements, uses animated cursors, and animates actions such as background saving and find and replace operations.

Options.AnimateScreenMovements = True

ArabicMode returns or sets the mode for the Arabic spelling checker.

Options.ArabicMode = wdBoth

ArabicNumeral returns or sets the numeral style for an Arabic language document.

Options.ArabicNumeral = wdNumeralArabic

AutoCreateNewDrawings true for Microsoft Word to draw newly created shapes in a drawing canvas.

Options.AutoCreateNewDrawings = True

AutoFormatAsYouTypeReplaceHyperlinks true if email addresses, server and share names (also known as UNC paths), and Internet addresses (also known as URLs) are automatically changed to hyperlinks as you type.

Options.AutoFormatAsYouTypeReplaceHyperlinks = True

AutoFormatReplaceHyperlinks true if email addresses, server and share names (also known as UNC paths), and Internet addresses (also known as URLs) are automatically formatted whenever Word AutoFormats a document or range.

Options.AutoFormatReplaceHyperlinks = True

AutoKeyboardSwitching true if Microsoft Word automatically switches the keyboard language to match what you are typing at any given time.

Options.AutoKeyboardSwitching = True

AutoWordSelection true if dragging selects one word at a time instead of one character at a time.

Options.AutoWordSelection = True

BackgroundSave true if Word saves documents in the background. When Word is saving in the background, users can continue to type and to choose commands.

Options.BackgroundSave = True

BibliographySort returns or sets a String that represents the order in which to display sources in the Source Manager dialog box.

Options.BibliographySort =

BrazilReform returns or sets the mode for the Brazilian Portuguese speller.

Options.BrazilReform = wdPortugueseBoth

ButtonFieldClicks returns or sets the number of clicks (either one or two) required to run a GOTOBUTTON or MACROBUTTON field.

Options.ButtonFieldClicks =

CheckGrammarAsYouType true if Word checks grammar and marks errors automatically as you type.

Options.CheckGrammarAsYouType = True

CheckGrammarWithSpelling true if Word checks grammar while checking spelling.

Options.CheckGrammarWithSpelling = True

CheckHangulEndings true if Microsoft Word automatically detects Hangul endings and ignores them during conversion from Hangul to Hanja.

Options.CheckHangulEndings = True

CheckSpellingAsYouType true if Microsoft Word checks spelling and marks errors automatically as you type.

Options.CheckSpellingAsYouType = True

CloudSignInOption true to give users the option to sign in to Microsoft OneDrive and other cloud locations.

Options.CloudSignInOption = True

ConfirmConversions true if Word displays the Convert File dialog box before it opens or inserts a file that isn't a Word document or template. In the Convert File dialog box, the user chooses the format to convert the file from.

Options.ConfirmConversions = True

ContextualSpeller returns or sets a Boolean that represents whether to use the contextual speller to check spelling based on the context of a word and the words around it.

Options.ContextualSpeller = True

ConvertHighAnsiToFarEast true if Microsoft Word converts text that is associated with an East Asian font to the appropriate font when it opens a document.

Options.ConvertHighAnsiToFarEast = True

CreateBackup true if Word creates a backup copy each time a document is saved.

Options.CreateBackup = True

CtrlClickHyperlinkToOpen true if Microsoft Word requires holding down the Ctrl key while clicking to open a hyperlink.

Options.CtrlClickHyperlinkToOpen = True

CursorMovement returns or sets how the insertion point progresses within bidirectional text.

Options.CursorMovement = wdCursorMovementLogical

DefaultEPostageApp sets or returns a String that represents the path and file name of the default electronic postage application.

Options.DefaultEPostageApp =

DefaultFilePath returns or sets default folders for items such as documents, templates, and graphics.

Options.DefaultFilePath(Path:=wdAutoRecoverPath) =

DefaultTextEncoding returns or sets an MsoEncoding constant representing the code page, or character set, that Microsoft Word uses for all documents saved as encoded text files.

Options.DefaultTextEncoding =

DefaultTray returns or sets the default tray your printer uses to print documents.

Options.DefaultTray =

DefaultTrayID returns or sets the default tray your printer uses to print documents.

Options.DefaultTrayID =

DeletedTextMark returns or sets the format of text that is deleted while change tracking is enabled.

Options.DeletedTextMark = wdDeletedTextMarkBold

DisableFeaturesbyDefault true for Microsoft Word to disable in all documents all features introduced after the version of Word specified in the DisableFeaturesIntroducedAfterbyDefault. The default value is False.

Options.DisableFeaturesbyDefault = True

DisableFeaturesIntroducedAfterbyDefault disables all features introduced after a the specified version for all documents.

Options.DisableFeaturesIntroducedAfterbyDefault = wd70

DocumentViewDirection returns or sets the alignment and reading order for the entire document.

Options.DocumentViewDirection = wdDocumentViewLtr

DoNotPromptForConvert sets or returns a Boolean that represents whether to prompt a warning dialog when the Convert command is invoked for documents that are in compatibility mode.

Options.DoNotPromptForConvert = True

EnvelopeFeederInstalled true if the current printer has a special feeder for envelopes.

Dim booEnvelopeFeederInstalled As Boolean
booEnvelopeFeederInstalled = Options.EnvelopeFeederInstalled

ExpandHeadingsOnOpen true to expand all headings in the document when the document opens.

Options.ExpandHeadingsOnOpen = True

FrenchReform returns or sets a WdFrenchSpeller constant that represents which spelling dictionary to use for regions of text with language formatting set to French.

Options.FrenchReform = wdFrenchBoth

GridDistanceHorizontal returns or sets the amount of horizontal space between the invisible gridlines that Word uses when you draw, move, and resize AutoShapes or East Asian characters in new documents.

Options.GridDistanceHorizontal =

GridDistanceVertical returns or sets the amount of vertical space between the invisible gridlines that Word uses when you draw, move, and resize AutoShapes or East Asian characters in new documents.

Options.GridDistanceVertical =

GridOriginHorizontal returns or sets the point, relative to the left edge of the page, where you want the invisible grid for drawing, moving, and resizing AutoShapes or East Asian characters to begin in new documents.

Options.GridOriginHorizontal =

GridOriginVertical returns or sets the point, relative to the top of the page, where you want the invisible grid for drawing, moving, and resizing AutoShapes or East Asian characters to begin in new documents.

Options.GridOriginVertical =

HangulHanjaFastConversion true if Microsoft Word automatically converts a word with only one suggestion during conversion between Hangul and Hanja.

Options.HangulHanjaFastConversion = True

HebrewMode returns or sets the mode for the Hebrew spelling checker.

Options.HebrewMode = wdFullScript

IgnoreInternetAndFileAddresses true if file name extensions, MS-DOS paths, email addresses, server and share names (also known as UNC paths), and Internet addresses (also known as URLs) are ignored while checking spelling.

Options.IgnoreInternetAndFileAddresses = True

IgnoreMixedDigits true if words that contain numbers are ignored while checking spelling.

Options.IgnoreMixedDigits = True

IgnoreUppercase true if words in all uppercase letters are ignored while checking spelling.

Options.IgnoreUppercase = True

IMEAutomaticControl true if Microsoft Word is set to automatically open and close the Japanese Input Method Editor (IME).

Options.IMEAutomaticControl = True

InlineConversion true if Microsoft Word displays an unconfirmed character string in the Japanese Input Method Editor (IME) as an insertion between existing (confirmed) character strings.

Options.InlineConversion = True

InsertedTextMark returns or sets how Microsoft Word formats inserted text while change tracking is enabled (the TrackRevisions property is True).

Options.InsertedTextMark = wdInsertedTextMarkBold

INSKeyForOvertype true if the INS key can be used for switching Overtype on and off.

Options.INSKeyForOvertype = True

INSKeyForPaste true if the INS key can be used for pasting the Clipboard contents.

Options.INSKeyForPaste = True

InterpretHighAnsi returns or sets the high-ANSI text interpretation behavior.

Options.InterpretHighAnsi = wdAutoDetectHighAnsiFarEast

LiveWordCount

Options.LiveWordCount = True

LocalNetworkFile true if Microsoft Word creates a local copy of a file on the user's computer when editing a file stored on a network server.

Options.LocalNetworkFile = True

MapPaperSize true if documents formatted for another country's/region's standard paper size (for example, A4) are automatically adjusted so that they're printed correctly on your country's/region's standard paper size (for example, Letter).

Options.MapPaperSize = True

MatchFuzzyAY true if Microsoft Word ignores the distinction between " " and " " following -row and -row characters during a search.

Options.MatchFuzzyAY = True

MatchFuzzyBV true if Microsoft Word ignores the distinction between " " and " " and between " " and " " during a search.

Options.MatchFuzzyBV = True

MatchFuzzyByte true if Microsoft Word ignores the distinction between full-width and half-width characters (Latin or Japanese) during a search.

Options.MatchFuzzyByte = True

MatchFuzzyCase true if Microsoft Word ignores the distinction between uppercase and lowercase letters during a search.

Options.MatchFuzzyCase = True

MatchFuzzyDash true if Microsoft Word ignores the distinction between minus signs, long vowel sounds, and dashes during a search.

Options.MatchFuzzyDash = True

MatchFuzzyDZ true if Microsoft Word ignores the distinction between " " and " " and between " " and " " during a search.

Options.MatchFuzzyDZ = True

MatchFuzzyHF true if Microsoft Word ignores the distinction between " " and " " and between " " and " " during a search.

Options.MatchFuzzyHF = True

MatchFuzzyHiragana true if Microsoft Word ignores the distinction between hiragana and katakana during a search.

Options.MatchFuzzyHiragana = True

MatchFuzzyIterationMark true if Microsoft Word ignores the distinction between types of repetition marks during a search.

Options.MatchFuzzyIterationMark = True

MatchFuzzyKanji true if Microsoft Word ignores the distinction between standard and nonstandard kanji ideography during a search.

Options.MatchFuzzyKanji = True

MatchFuzzyKiKu true if Microsoft Word ignores the distinction between " " and " " before -row characters during a search.

Options.MatchFuzzyKiKu = True

MatchFuzzyOldKana true if Microsoft Word ignores the distinction between new kana and old kana characters during a search.

Options.MatchFuzzyOldKana = True

MatchFuzzyProlongedSoundMark true if Microsoft Word ignores the distinction between short and long vowel sounds during a search.

Options.MatchFuzzyProlongedSoundMark = True

MatchFuzzyPunctuation true if Microsoft Word ignores the distinction between types of punctuation marks during a search.

Options.MatchFuzzyPunctuation = True

MatchFuzzySmallKana true if Microsoft Word ignores the distinction between diphthongs and double consonants during a search.

Options.MatchFuzzySmallKana = True

MatchFuzzySpace true if Microsoft Word ignores the distinction between space markers used during a search.

Options.MatchFuzzySpace = True

MatchFuzzyTC true if Microsoft Word ignores the distinction between " ", " ", and " ", and between " " and " " during a search.

Options.MatchFuzzyTC = True

MatchFuzzyZJ true if Microsoft Word ignores the distinction between " " and " " and between " " and " " during a search.

Options.MatchFuzzyZJ = True

MeasurementUnit returns or sets the standard measurement unit for Microsoft Word.

Options.MeasurementUnit = wdCentimeters

MonthNames returns or sets the direction for conversion between Hangul and Hanja.

Options.MonthNames = wdMonthNamesArabic

MoveFromTextMark returns or sets a WdMoveFromTextMark constant that represents the type of revision mark to use for moved text.

Options.MoveFromTextMark = wdMoveFromTextMarkBold

MoveToTextMark returns or sets a WdMoveToTextMark constant that represents the type of revision mark to use for moved text.

Options.MoveToTextMark = wdMoveToTextMarkBold

MultipleWordConversionsMode returns or sets the direction for conversion between Hangul and Hanja.

Options.MultipleWordConversionsMode = wdHangulToHanja

OMathAutoBuildUp returns or sets a Boolean that represents whether Microsoft Word automatically converts equations to professional format. True indicates that Word automatically converts equations to professional format.

Options.OMathAutoBuildUp = True

OMathCopyLF returns or sets a Boolean that represents how equations are represented in plain text. True indicates equations are represented in Linear Format. False indicates equations are represented in MathML.

Options.OMathCopyLF = True

OptimizeForWord97byDefault true if Microsoft Word optimizes all new documents for viewing in Word 97 by disabling any incompatible formatting.

Options.OptimizeForWord97byDefault = True

Overtype true if Overtype mode is active.

Options.Overtype = True

PageAlignmentGuides returns or sets a Boolean that specifies whether page alignment guides are displayed in the user interface.

Options.PageAlignmentGuides = True

Pagination true if Microsoft Word repaginates documents in the background.

Options.Pagination = True

ParagraphAlignmentGuides returns or sets a Boolean that specifies whether paragraph alignment guides are displayed in the user interface.

Options.ParagraphAlignmentGuides = True

Parent returns an object that represents the parent object of the specified Options object.

Dim objParent As Object
Set objParent = Options.Parent

PasteMergeFromPPT true to merge text formatting when pasting from Microsoft PowerPoint.

Options.PasteMergeFromPPT = True

PasteMergeFromXL true to merge table formatting when pasting from Microsoft Excel.

Options.PasteMergeFromXL = True

PasteMergeLists true to merge the formatting of pasted lists with surrounding lists.

Options.PasteMergeLists = True

PasteOptionKeepBulletsAndNumbers returns or sets a Boolean that represents whether to keep bullets and numbering when selecting Keep text only from the Paste Options context menu.

Options.PasteOptionKeepBulletsAndNumbers = True

PasteSmartCutPaste true if Microsoft Word intelligently pastes selections into a document.

Options.PasteSmartCutPaste = True

PictureEditor returns or sets the name of the application to use to edit pictures.

Options.PictureEditor =

PictureWrapType sets or returns a WdWrapTypeMerged that indicates how Microsoft Word wraps text around pictures.

Options.PictureWrapType = wdWrapMergeBehind

PortugalReform returns or sets the mode for the European Portuguese speller.

Options.PortugalReform = wdPortugueseBoth

PrecisePositioning returns or sets a Boolean that represents whether Word optimizes character positioning for print layout rather than on-screen readability. True disables the default setting that compresses character spacing to facilitate on-screen readability and enables character spacing for print media.

Options.PrecisePositioning = True

PreferCloudSaveLocations true to save new documents in web locations by default.

Options.PreferCloudSaveLocations = True

PrintXMLTag returns a Boolean that represents whether to print the XML tags when printing a document. Corresponds to the XML tags check box on the Print tab in the Options dialog box.

Options.PrintXMLTag = True

RepeatWord returns or sets a Boolean that represents whether to mark words that are repeated when spelling is checked. True flags repeated words.

Options.RepeatWord = True

ReplaceSelection true if the result of typing or pasting replaces the selection.

Options.ReplaceSelection = True

RevisedLinesMark returns or sets the placement of changed lines in a document with tracked changes.

Options.RevisedLinesMark = wdRevisedLinesMarkLeftBorder

RevisedPropertiesMark returns or sets the mark used to show formatting changes while change tracking is enabled.

Options.RevisedPropertiesMark = wdRevisedPropertiesMarkBold

RTFInClipboard you have requested Help for a Visual Basic keyword used only on the Macintosh. For information about the RTFInClipboard property for the Options object, consult the language reference Help included with Microsoft Office Macintosh Edition.

Options.RTFInClipboard = True

SaveInterval returns or sets the time interval in minutes for saving AutoRecover information.

Options.SaveInterval =

SaveNormalPrompt true if Microsoft Word prompts the user for confirmation to save changes to the Normal template before it closes.

Options.SaveNormalPrompt = True

SavePropertiesPrompt true if Microsoft Word prompts for document property information when saving a new document.

Options.SavePropertiesPrompt = True

SendMailAttach true if the Send To command on the File menu inserts the active document as an attachment to a mail message.

Options.SendMailAttach = True

SequenceCheck true to check the sequence of independent characters for South Asian text.

Options.SequenceCheck = True

ShortMenuNames

Options.ShortMenuNames = True

ShowMenuFloaties returns or sets a Boolean that represents whether to display mini toolbars when the user right-clicks in the document window.

Options.ShowMenuFloaties = True

ShowPopupAddRowColToTable

Options.ShowPopupAddRowColToTable = True

SmartCursoring returns or sets a Boolean that represents whether smart cursoring is enabled. True enables smart cursoring.

Options.SmartCursoring = True

SmartCutPaste true if Microsoft Word automatically adjusts the spacing between words and punctuation when cutting and pasting occurs.

Options.SmartCutPaste = True

SmartParaSelection true for Microsoft Word to include the paragraph mark in a selection when selecting most or all of a paragraph.

Options.SmartParaSelection = True

SnapToGrid true if AutoShapes or East Asian characters are automatically aligned with an invisible grid when they are drawn, moved, or resized.

Options.SnapToGrid = True

SnapToShapes true if Word automatically aligns AutoShapes or East Asian characters with invisible gridlines that go through the vertical and horizontal edges of other AutoShapes or East Asian characters.

Options.SnapToShapes = True

SpanishMode returns or sets the mode for the Spanish speller.

Options.SpanishMode = wdSpanishTuteoAndVoseo

StoreRSIDOnSave true for Microsoft Word to assign a random number to changes in a document, each time a document is saved, to facilitate comparing and merging documents.

Options.StoreRSIDOnSave = True

StrictFinalYaa true if the spelling checker uses spelling rules regarding Arabic words ending with the letter yaa.

Options.StrictFinalYaa = True

StrictInitialAlefHamza true if the spelling checker uses spelling rules regarding Arabic words beginning with an alef hamza.

Options.StrictInitialAlefHamza = True

StrictRussianE true if the spelling checker uses spelling rules regarding Russian words that use the strict ë character.

Options.StrictRussianE = True

StrictTaaMarboota true if the spelling checker uses spelling rules to flag Arabic words ending with haa instead of taa marboota.

Options.StrictTaaMarboota = True

SuggestFromMainDictionaryOnly true if Microsoft Word draws spelling suggestions from the main dictionary only.

Options.SuggestFromMainDictionaryOnly = True

SuggestSpellingCorrections true if Microsoft Word always suggests alternative spellings for each misspelled word when checking spelling.

Options.SuggestSpellingCorrections = True

TabIndentKey true if the TAB and BACKSPACE keys can be used to increase and decrease, respectively, the left indent of paragraphs and if the BACKSPACE key can be used to change right-aligned paragraphs to centered paragraphs and centered paragraphs to left-aligned paragraphs.

Options.TabIndentKey = True

TypeNReplace true for Microsoft Word to replace illegal South Asian characters.

Options.TypeNReplace = True

UpdateLinksAtOpen true if Microsoft Word automatically updates all embedded OLE links in a document when it is opened.

Options.UpdateLinksAtOpen = True

UseCharacterUnit true if Microsoft Word uses characters as the default measurement unit for the current document.

Options.UseCharacterUnit = True

UseGermanSpellingReform true if Microsoft Word uses the German post-reform spelling rules when checking spelling.

Options.UseGermanSpellingReform = True

UseLocalUserInfo returns or sets a Boolean; True if Microsoft Word identifies the document author based upon the User name and Initials settings on the General tab of the Options dialog box, and False if Word identifies the author based on the account information with which the user signed in to Office.

Options.UseLocalUserInfo = True

UseSubPixelPositioning returns or sets a Boolean that specifies whether sub-pixel positioning is enabled.

Options.UseSubPixelPositioning = True

VisualSelection returns or sets the selection behavior based on visual cursor movement in a right-to-left language document.

Options.VisualSelection = wdVisualSelectionBlock