如何使用Excel VBA将文本框的内容保存为.sql文件?

如何使用Excel VBA将文本框的内容保存为.sql文件?,sql,vba,excel,Sql,Vba,Excel,我创建了一个SQL脚本生成器,当我在组合框中输入数据时,文本框中将生成一个脚本。(请参见下面的示例图片。) 我想做的是,单击一个按钮后,系统会提示我输入文件名和保存位置,然后它将获取文本框的值,并将其保存为.sql文件。如何执行此操作?使用Application.GetSaveAsFilename,然后根据代码示例将文本写入文件 Dim FileName As String FileName = Application.GetSaveAsFilename(, "*.sql,*.sql", ,

我创建了一个SQL脚本生成器,当我在组合框中输入数据时,文本框中将生成一个脚本。(请参见下面的示例图片。)


我想做的是,单击一个按钮后,系统会提示我输入文件名和保存位置,然后它将获取文本框的值,并将其保存为.sql文件。如何执行此操作?

使用Application.GetSaveAsFilename,然后根据代码示例将文本写入文件

Dim FileName As String
FileName = Application.GetSaveAsFilename(, "*.sql,*.sql", , "Save SQL File")
Open FileName For Output As #1
Print #1, "SQL Query here"
Close #1

尝试
Application.GetSaveAsFilename