Application.OrganizerRename Method

Word Developer Reference

Renames the specified style, AutoText entry, toolbar, or macro project item in a document or template.

Syntax

expression.OrganizerRename(Source, Name, NewName, Object)

expression   Required. A variable that represents an Application object.

Parameters

Name Required/Optional Data Type Description
Source Required String The file name of the document or template that contains the item you want to rename.
Name Required String The name of the style, AutoText entry, toolbar, or macro you want to rename.
NewName Required String The new name for the item.
Object Required WdOrganizerObject The kind of item you want to copy.

Example

This example changes the name of the style named "SubText" in the active document to "SubText2."

Visual Basic for Applications
  Dim styleLoop as Style

For Each styleLoop In ActiveDocument.Styles If styleLoop.NameLocal = "SubText" Then Application.OrganizerRename _ Source:=ActiveDocument.Name, Name:="SubText", _ NewName:="SubText2", _ Object:=wdOrganizerObjectStyles End If Next styleLoop

This example changes the name of the macro module named "Module1" in the attached template to "Macros1."

Visual Basic for Applications
  Dim dotTemp As Template

dotTemp = ActiveDocument.AttachedTemplate.Name Application.OrganizerRename Source:=dotTemp, Name:="Module1", _ NewName:="Macros1", Object:=wdOrganizerObjectProjectItems

See Also