Need help to change configuration name

Hello,

I am new to forum need help to change configuration name from default to some fixed string like "main body" or project name...

As I have thousands of part for top assembly so instead it renaming it by manually can someone help me with macro it saves a lot of time.

For reference I am attaching Image..In Image デフォルト means Defaut

thank you in advance.

I found below macro it worke fine but I want to change name from doc name to some text ..

Dim swApp as SldWorks.SldWorks

Sub main()

Set swApp = Application.SldWorks

swApp.ActiveDoc.ConfigurationManager.ActiveConfiguration.Name = swApp.ActiveDoc.GetTitle()

End Sub

SolidworksApi/macros