TablesOfAuthorities.MarkCitation Method (Word)
Inserts a TA (Table of Authorities Entry) field and returns the field as a Field object.
Syntax
expression .MarkCitation(Range, ShortCitation, LongCitation, LongCitationAutoText, Category)
expression Required. A variable that represents a TablesOfAuthorities collection.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Range |
Required |
Range |
The location of the table of authorities entry. The TA field is inserted after Range. |
ShortCitation |
Required |
String |
The short citation for the entry as it will appear in the Mark Citation dialog box (Insert menu, Index and Tables command). |
LongCitation |
Optional |
Variant |
The long citation for the entry as it will appear in the table of authorities. |
LongCitationAutoText |
Optional |
Variant |
The name of the AutoText entry that contains the text of the long citation as it will appear in the table of authorities. |
Category |
Optional |
Variant |
The category number to be associated with the entry: 1 corresponds to the first category in the Category box in the Mark Citation dialog box, 2 corresponds to the second category, and so on. |
Example
This example inserts a table of authorities entry (a TA field) that references the selected text. The long citation text is set to "Forrester v. Craddock" and the category is set to Cases.
ActiveDocument.TablesOfAuthorities.MarkCitation _
Range:=Selection.Range, ShortCitation:=Selection.Range.Text, _
LongCitation:="Forrester v. Craddock", Category:=1
This example inserts a table of authorities entry that references the selected text. The entry text that appears in the table of authorities is the text typed into the input box and the category is set to Other Authorities.
Dim strCitation As String
strCitation = InputBox("Type citation text")
ActiveDocument.TablesOfAuthorities.MarkCitation _
Range:=Selection.Range, ShortCitation:=Selection.Range.Text, _
LongCitation:=strCitation, Category:=3