swRevisionTableMultipleSheetStyle does not update the exiting revision tables?

It appears that swRevisionTableMultipleSheetStyle does not update the exiting revision tables. Changing from swRevisionTable_Independent to swRevisionTable_LinkedToSheet1 or swRevisionTable_SeeSheet1 via the API does not affect an exiting revision table. Although it does work when changed manually. This is a problem when trying to import drawings to PDM as they are blocked.

Dim swApp As Object

Dim swModel As Object

Sub main()

     Set swApp = Application.SldWorks

     Set swModel = swApp.ActiveDoc

     swModel.Extension.SetUserPreferenceInteger swUserPreferenceIntegerValue_e.swRevisionTableMultipleSheetStyle, 0,           swRevisionTableMultipleSheetStyle_e.swRevisionTable_LinkedToSheet1

End Sub

Has anyone experienced this or have an API work around? I have tried rebuilding.

SolidworksApi/macros