Question

vb中xlBook.SaveAs的问题

s = Controls("d:\" + Text1.Text + ".xlsx"))
xlBook.SaveAs FileName：=s
为什么总是提示没找到控件，怎样才能把text1.text当做保存文件的文件名啊

Answer 1

总是提示没找到控的原因是~~Controls 这个是窗体里的控件集合~你要对一个变量S赋值 怎么可以用这个呢~~应该直接s = “d:\" & Text1.Text & ".xlsx" 再者做字符链接最好用&连接符 而不是用+号
xlBook.SaveAs FileName：=s 这一句是没问题的
你之所以用date不能作为文件名 不是因为其中有符号- 而是因为你系统的日期格式是斜杠或反斜杠导致的 你可以用format(date,"yyyy-mm-dd")

Answer 2

xlBook.SaveAs "d:\" & Text1.Text & ".xlsx"

追问

为什么前面有Text1.Text =Date就不能保存
日期不能做文件名吗？

追答

日期里有-符号的话就不能做了，文件名里不允许有-符号，不过可以变通
xlBook.SaveAs "d:\" & Format(Text1.Text,"yyyy.mm.dd"） & ".xlsx"
建议采纳