شرمنده یه سوال دیگه من کد زیر رو برای ذخیره کردن دارم :

کد:
cmdg6.Filter = "*.txt | *.txt |*.xls|*.xls"
On Error Resume Next
Dim filepath As String
cmdg6.ShowSave
filepath = cmdg6.FileName
Open filepath For Output As #6
Print #6, FlatEdit
Close #6
به زبون ساده مشکل من اینه که می خوام این دکمه به عنوان save عمل کنه نه save as ، چه تغییری باید داخل کد بدم ممنون