Part.SaveAs3("C:\Users\Normand\Desktop\" & Part.ConfigurationManager.ActiveConfiguration.Name & ".STL", 0, 0)
Be careful not to use any characters such as * ? \ / in the configuration name.
Wow! That was fast and easy! Very helpful.
Here is what i have done to loop my batch.
Now i have a SW instance running for hours exporting all i want!
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Dim i As Integer
Set swApp = _
Set Part = swApp.ActiveDoc
i = 9339
Do Until i = 10000
boolstatus = Part.ShowConfiguration2(i)
longstatus = Part.SaveAs3("S:\Production\Production OAM\_Ressources\Bagues identification\" & "Bague # " & Part.ConfigurationManager.ActiveConfiguration.Name & ".STL", 0, 0)
i = i + 1