I want to write a VBA macro to export each configuration of my SolidWorks part as a separate STL file. The current code is not working. Can someone help me with this?

Sub ExportConfigurationsToSTL()
   Dim swApp As Object
   Dim swModel As Object
   Dim swConfMgr As Object
   Dim swConfNames As Variant
   Dim i As Integer
   Dim stlPath As String
   Dim saveDir As String
   Dim status As Boolean
   Dim errors As Long
Dim warnings