再次需要帮助 [英] Help Needed again

问题描述

大家好，最后一次帮助很棒，干得好吃。


需要更多帮助


有没有人知道代码宏保存然后关闭excel。但节省了不断增加的收入。


即第一次使用doc1.xls

第二次调用doc2.xls

等。


欢呼

Hi guys, last help was awesom, worked a treat.

need some more help

does anyone know the code for a macro to save and then close down excel. but saving in increasing incriments.

ie first time its doc1.xls
2nd time its called doc2.xls
etc.

cheers

推荐答案

大家好，上次帮助很棒，工作了一个款待。


需要更多的帮助


有没有人知道要保存的宏的代码然后关闭excel。但节省了不断增加的收入。


即第一次使用doc1.xls

第二次调用doc2.xls

等。


欢呼

Hi guys, last help was awesom, worked a treat.

need some more help

does anyone know the code for a macro to save and then close down excel. but saving in increasing incriments.

ie first time its doc1.xls
2nd time its called doc2.xls
etc.

cheers

嗨


建议你的柜台上有一个柜台运行电子表格（隐藏）

例如：单元格AA1

hi

suggest your have a counter running on your spreadsheet (hidden)
e.g: cell AA1

展开 | 选择 | Wrap | 行号

嗨

建议您在电子表格上运行一个计数器（隐藏）

例如：cell AA1

hi
suggest your have a counter running on your spreadsheet (hidden)
e.g: cell AA1

哇获取当前文件名并修改它是否更简单？

Wouldn''t it be simpler to just take the current file name and modify it?

简单来说不简单获取当前文件名并进行修改？

Wouldn''t it be simpler to just take the current file name and modify it?

嗨


你的绝对正确


喜欢


Sub auto_close（）

Oldname = ActiveWorkbook.Name

NewName =" Doc" &安培;修剪（Str（右（Old（Oldname，Len（Oldname） - 3）+ 1）））

ActiveWorkbook.SaveAs NewName

End Sub

hi

your absolutely right

like

Sub auto_close()
Oldname = ActiveWorkbook.Name
NewName = "Doc" & Trim(Str(Val(Right(Oldname, Len(Oldname) - 3) + 1)))
ActiveWorkbook.SaveAs NewName
End Sub

这篇关于再次需要帮助的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！