Olá pessoal! Estou criando uma macro em VB para um programa chamado SolidWorks. Mas está apresentando o erro: Object variable or With block variable not set Eu não entendo muito de VB no geral, sem duvida eu estou fazendo algo errado... alguém pode me ajudar? O Código é: Dim swApp As Object
Dim file As String
Dim psn As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
file = InputBox("Please, enter the file name")
file = file & ".sldprt"
psn.CopyFile "C:\Test\CavernaOrigen.SLDPRT", "C:\Test\" & file
boolstatus = Part.AddComponent("C:\Test\" & file, 22.29001260703, 22.27347166485, 22.27137205309)
End Sub O problem está no comando CopyFile, não sei usar o comando =/