Function ImportToolboxItem( _
   ByVal StdToImport As System.String, _
   ByVal DestinationFilePath As System.String _
) As System.Integer

Dim instance As ISldWorks
Dim StdToImport As System.String
Dim DestinationFilePath As System.String
Dim value As System.Integer
 
value = instance.ImportToolboxItem(StdToImport, DestinationFilePath)

System.int ImportToolboxItem( 
   System.string StdToImport,
   System.string DestinationFilePath
)

System.int ImportToolboxItem( 
&   System.String^ StdToImport,
&   System.String^ DestinationFilePath
) 

Parameters

StdToImport

Standard to import (see Remarks)

DestinationFilePath

Path and name of file to import (see Remarks)

Return Value

'VBA Preconditions'

'Open a part.

'Ensure the *.xlsx file exists.

Dim swApp As SldWorks.SldWorks
Dim SourceHWItem As String
Dim DestinationFoldeName As String
Dim longstatus As Long
Option Explicit

Sub Main()

    Set swApp = Application.SldWorks
   
    SourceHWItem = "ansi inch\bolts and screws\hex head\heavy hex bolt_ai.sldprt"
   
    DestinationFolderName = "C:\temp\AI_Heavy Hex Bolt.xlsx"
   
    longstatus = swApp.ImportToolboxItem(SourceHWItem, DestinationFolderName)
   
           
    Exit Sub
       

End Sub

Specify StdToImport with the path and file name beneath C:\SOLIDWORKS Data\browser, e.g., "ansi inch\bolts and screws\hex head\heavy hex bolt_ai.sldprt".

Specify DestinationFilePath with the path and file name of the Excel Workbook (*.xslx) you want to import. The Excel file name is formatted as follows:

standard_hole class_hole type.xslx