vba erros

[sangumang]

Sub Changesavas()

Dim FileSaveAsName As Variant

Dim intchoice As Integer

Static saveProcess As Boolean

Application.EnableEvents = False

ActiveWindow.ScrollRow = 1

Set FileSaveName = Application.FileDialog(msoFileDialogSaveAs)

FileSaveName.InitialFileName = "E:\APLIKASI PKM\V3\" & Range("M9") & " " & Range("L74") & " " & Range("I9") & " " & Range("I10") & " " & Range("I11") & " " & Range("J11").Value

FileSaveName.FilterIndex = 2

intchoice = FileSaveName.Show

If intchoice <> 0 Then

FileSaveName.Execute

End If



Application.EnableEvents = True





End Sub

 

[sangumang]

FileSaveName.Execute <<<< help error