Written by Allen Wyatt (last updated December 9, 2023)
This tip applies to Word 2007, 2010, 2013, 2016, 2019, Word in Microsoft 365, and 2021
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, Word in Microsoft 365, and 2021.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!
Fields (sometimes called field codes) allow you to insert dynamic information in your documents. If you want to see the ...
Discover MoreThe PAGE field is used to indicate the current page number on which the field occurs. If you want to add this field to ...
Discover MoreTired of getting the fields in your document overwritten by regular editing tasks? Here's how to make those mistakes more ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
2023-12-11 10:10:02
Andrew
Instead of -- Left(Trim(aField.Code), 4) = "DATE" --
why not check for -- aField.Type = wdFieldDate?
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.
Visit the WordTips channel on YouTube
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2024 Sharon Parq Associates, Inc.
Comments