如何利用VBA调用“另存为”对话框，并且将另存为的文件类型设定为*.csv

TC天晨

请问，如何利用VBA调用“另存为”对话框，并且将另存为的文件类型设定为*.csv。另一方面，保存路径和文件名怎么更改为自己想要的？

艾姆西希

设置一个一个变量=inputbox函数，输入自己设定的名称，然后再用SaveAs方法或者SaveCopyAs方法

liulang0808

ActiveWorkbook.SaveAs Filename:="C:\Users\HP\Desktop\test1111.csv", _
        FileFormat:=xlCSV, CreateBackup:=False
文件路径可以根据需求自行修改

aman1516

论坛上多的是调 用EXCEL对话框的代码：

Application.Dialogs(1).Show是调用打开对话框
Application.Dialogs(5或145).Show是调用另存为对话框，
Application.Dialogs(6).Show是删除文档
Application.Dialogs(7).Show是页面设置
Application.Dialogs(8).Show是打印对话框
Application.Dialogs(9).Show是选择打印机对话框
Application.Dialogs(12).Show是重排窗口设置对话框
Application.Dialogs(17).Show宏对话框
Application.Dialogs(23).Show设置打印标题
Application.Dialogs(26).Show字体设置对话框
Application.Dialogs(27).Show显示选项
Application.Dialogs(28).Show保护工作表
Application.Dialogs(32).Show重算选项
Application.Dialogs(39或192).Show排序
Application.Dialogs(40).Show序列选项
Application.Dialogs(41).Show模拟运算表
Application.Dialogs(42或111).Show单元格格式，选择单元格内容的格式
Application.Dialogs(43).Show选择单元格字体的排列格式，横排或竖排等
Application.Dialogs(44或134或190).Show字体选择
Application.Dialogs(45).Show边框格式设置
Application.Dialogs(46).Show对单元格的保护或隐藏选项
Application.Dialogs(47).Show列宽设置选项
Application.Dialogs(52).Show清除对话框
Application.Dialogs(53).Show选择性粘贴对话框
Application.Dialogs(54).Show删除对话框
Application.Dialogs(55).Show插入对话框
Application.Dialogs(61或110).Show定义名称对话框
Application.Dialogs(62).Show指定名称
Application.Dialogs(63或132).Show定位
Application.Dialogs(64).Show查找
Application.Dialogs(84).Show设置单元格颜色和图案
Application.Dialogs(91).Show分列
Application.Dialogs(94).Show取消或隐藏工作表选择对话框
Application.Dialogs(95).Show工作区视图等选项
Application.Dialogs(103).Show选择要激活哪个工作表对话框
Application.Dialogs(108).Show复制图片选项
Application.Dialogs(119).Show新建对话框
Application.Dialogs(127).Show设置行高
Application.Dialogs(130).Show替换对话框
Application.Dialogs(137).Show拆分当前窗口
Application.Dialogs(161).Show设置图表颜色
Application.Dialogs(170或171).Show移动当前窗口
Application.Dialogs(191).Show合并计算对话框
Application.Dialogs(198).Show单变量求解
Application.Dialogs(199).Show选定成组工作表
Application.Dialogs(200).Show填充成组工作表

或自己根据需要再搜索吧

zymywz

aman1516 发表于 2015-5-23 23:02
论坛上多的是调 用EXCEL对话框的代码：

Application.Dialogs(1).Show是调用打开对话框

很好！！！

scnc001

aman1516 发表于 2015-5-23 23:02
论坛上多的是调 用EXCEL对话框的代码：

Application.Dialogs(1).Show是调用打开对话框

如何让 保存（CTRL+S或保存按钮） 调用 另存为 对话框 呢

ykcbf1100

scnc001 发表于 2024-8-26 18:18
如何让 保存（CTRL+S或保存按钮） 调用 另存为 对话框 呢

Application.Dialogs(5).Show  '//另存对话框