-1

我在一家销售办公室工作，目前我们使用所有销售报价的硬拷贝并按字母顺序归档。我已经制作了我们报价文件的 Excel 版本，希望能让一切变得更有效率。不幸的是，我们对办公室中的每个人的计算机技能都没有信心，因此需要使其尽可能用户友好。

我需要通过 vba 使用命令按钮，它将 Excel 工作表保存到我们网络上的指定路径并将副本重命名为指定单元格范围的单元格内容（如果可能的话）。

基本上对于每一个报价，如果可能的话，我希望将工作表的保存副本保存为“Doe.John.06.01.2013”​​。直到昨天我才知道 vba 的存在，虽然我认为它很神奇，它让我内心的书呆子高兴得跳起来，但我是一个代码 NOOB！...我在网上进行了研究，但找不到任何我需要的东西。如果这里有人可以帮助我，我将永远感激不尽:)

4

1 回答 1

2

我建议您熟悉 Excel 中的宏记录器。基本上它允许您将您的操作记录到 VBA 中。这是学习使用什么代码来完成某些操作的好方法。例如，我刚刚记录了这个：

ActiveWorkbook.SaveAs Filename:="C:\Users\Nemmy\Documents\Book2.xlsx", _
    FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

获取该代码并让它在单击按钮时运行是一件相当简单的事情。您可以使用以下方式修改它以从几个单元格值中获取文件名：

    Dim sPath as string
    sPath=ActiveSheet.Range("A1").Value & ActiveSheet.Range("A2").Value & ".xlsx"
    ActiveWorkbook.SaveAs Filename:=sPath, _
        FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

单元格 A1 将包含您的报价目录的基本路径，单元格 A2 将包含文件的名称。

于 2013-06-02T04:42:08.940 回答