excel中,如何可以使另存为时的名称格式为:指定名字+日期。

2025-02-26 21:53:14
推荐回答(5个)
回答1:

这几天出差了,做好发给你
===============================================================
Sub asdf()
Const CN As String * 14 = "中英文对照模板"
Dim file As String
Dim today As String
Dim I, f
For I = 1 To 15
I = Format(I)
today = Format(Date)
f = Dir(file)
file = "h:\lwp\" + I + CN + today + ".xls"
If f = Dir(file) Then Exit For
Next I
ActiveWorkbook.SaveAs filename:=file
End Sub程序中的目录换成你想保存的目录,有个问题没解决,生成的文件是按2.4.6.8的顺序生成的,正在想办法。

回答2:

等待高手出现

回答3:

另存为---修改名词。

回答4:

用VBA吧,很简单

回答5:

VLOOKUP

============================

两个工作薄 之间引用 是 一样的
可以鼠标去选中范围

在 一个工作表 引用另一个工作薄 的数据 格式 如下

=VLOOKUP(A1,'[新建 Microsoft Excel 工作表 (2).xls]Sheet1'!$A:$B,2,0)

[新建 Microsoft Excel 工作表 (2).xls] 是文件名

要求两个 文件都打开