MACRO TO CHANGE BOM NAME IN FEATUREMANAGER

Hello all

Do you know how can I rename with VBA (macro) the last BOM in FeatureManager.

For example insted of "Bill of Materials7" I would like it to be "TEST BOM"

Thanks

SolidworksApi macros