excel另存为文件

关于，一般有如下的两种方式。 请根据情况，选择一种适合你的方法。 一、通过FileExists判断文件是否存在 Dim MyFile As Object Set MyFile = CreateObject("Scripting.FileSystemObject") If MyFile.FileExists("E:\dzwebs\Pic\logo.gif" ) = True Then MsgBox "文件存在" Else MsgBox "文件不存在" End If 以上代码在VBA环境下使用。或者将其制作成为宏也可以。"E:\dzwebs\Pic\logo.gif"为文件路径及文件名称，可自行修改。 二、通过Dir来判断 Dim YouFile As String YouFile = Dir("E:\MyPictures\Pic\logo.gif") If x "" Then MsgBox "文件存在" Else MsgBox "文件不存在" Endif "E:\MyPictures\Pic\logo.gif"为文件路径及文件名称，可自行修改。当然，如上代码，也在VBA下使用，可自作成为宏或函数都可以。 上面的两种方法，本站推荐你使用第一种方法，因为第一种方法比较符合逻辑思维。

请上传一个模拟的样表，说明要求。给你做一下。

在共享属性中没有选 择可以保存，点一下就可以了。

找到文件路径从里面打开。不要从桌面打开

去同事电脑复制一份过来，然后编辑一下，保存在本地，看看能保存不，如果可以，应该是上一部某个编辑的问题

可以直接定位到范围复制粘贴

如果真的需要分成几十个文件，可以试用一个工具“
excel
data
helper(excel数据助手)”，用它的拆分功能，但拆分前，要添加一列作为拆分条件，该列即为即将保存的文件名。

C2写上公式
=VLOOKUP(B2,表2!A:B,2,0)
确定好后可以下拉批量复制