Converting All DATE Fields to Text

Written by Allen Wyatt (last updated December 9, 2023)
This tip applies to Word 2007, 2010, 2013, 2016, 2019, 2021, and Word in Microsoft 365


1

Kristen has a document that uses fields extensively. A lot (but not all) of those fields are DATE fields. She can convert each field to text manually using Ctrl+Shift+F9, but she would like a way to convert all of the DATE fields at once without disturbing the other fields.

The easiest way to do this is to use a macro. Fortunately, Word makes all the fields in a document available in the Fields collection, and you can use your macro to step through each of those. Here's an example:

Sub UnlinkDateFields()
    Dim aField As Field
    Dim lNum As Long

    lNum = 0
    For Each aField In ActiveDocument.Fields
        If Left(Trim(aField.Code), 4) = "DATE" Then
            aField.Unlink
            lNum = lNum + 1
        End If
    Next aField
    MsgBox lNum & " DATE fields converted to text"
End Sub

Note that the .Code property of the field is examined, which is what you see when you look at the field code within your document. If the left four characters of the .Code property is equal to "DATE", then the .Unlink method is invoked, which converts the field to text. The macro keeps a count of how many fields were converted and then, when finished, displays a message box that shows the total.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (6016) applies to Microsoft Word 2007, 2010, 2013, 2016, 2019, 2021, and Word in Microsoft 365.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Understanding Macros

What is a macro? Ever wonder what these are and how to use them? This tip answers the basics of what a macro is used for, ...

Discover More

Combining Multiple Rows in a Column

Do you need to concatenate the contents of a range of cells in the same column? Here's a formula and a handy macro to ...

Discover More

Specifying Proper Case

If you need to change the case of letters in a cell, one of the functions you can use is the PROPER function. This tip ...

Discover More

Discover the Power of Microsoft Office This beginner-friendly guide reveals the expert tips and strategies you need to skyrocket your productivity and use Office 365 like a pro. Mastering software like Word, Excel, and PowerPoint is essential to be more efficient and advance your career. Simple lessons guide you through every step, providing the knowledge you need to get started. Check out Microsoft Office 365 For Beginners today!

More WordTips (ribbon)

Manual Line Breaks in STYLEREF Results

The STYLEREF field returns all the text referenced by a given style. When the text includes special characters, such as a ...

Discover More

Inserting a Document's File Location

Once you save a document on disk, it is stored in a particular folder (or location) on that disk. You may want that ...

Discover More

Updating a Field in a Text Box

If you put a field into a text box, you might be surprised to find that it doesn't update when you try to update all your ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] (all 7 characters, in the sequence shown) in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 8 - 7?

2023-12-11 10:10:02

Andrew

Instead of -- Left(Trim(aField.Code), 4) = "DATE" --
why not check for -- aField.Type = wdFieldDate?


This Site

Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.

Videos
Subscribe

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.