Excel 宏在我的计算机上工作，但在我同事的计算机上不工作

在实习期间，我试图为我的同事制作一个宏。我想我的代码应该没问题。唯一的问题是，该代码在我的计算机上运行，但当我的同事试图告诉我们它时，会显示一个错误代码。我已经将代码调整到了光盘的位置

我真的不知道出了什么问题

我收到了以下错误代码：

运行时错误“1004”： 对象“\u工作表”的方法“另存为”失败

我们在同一个Excel版本和网络中工作

有人能帮我吗

Sub nieuw4()

    Sheets("Output IE").Select
    Sheets("Output IE").Copy
    ActiveSheet.Shapes.Range(Array("Button 6")).Select
    ActiveSheet.Shapes.SelectAll
    ActiveSheet.Shapes.SelectAll
    Selection.Delete
    Range("B8:U33").Select
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    ActiveSheet.EnableSelection = xlNoRestrictions
    
    ActiveWorkbook.Saveas FileName:="U:\MACRO test\BREAKDOWN RAS TEST 17052021\Output IE\" & _
    "Breakdown - " & Workbooks("Test Ras breakdown per markt 20211.xlsm").Sheets("Grid inladen").Range("A2") & (" - ") & Workbooks("Test Ras breakdown per markt 20211.xlsm").Sheets("Grid inladen").Range("C2") & ".xlsx"

End Sub

---

我认为您的宏没有任何问题，但您要写入的位置：

U:\...

这意味着三件事：

• 你应该有一个U:-驱动器的驱动器映射。你在那台电脑上有这个吗
• 您应该具有写入该（网络）驱动器的写入权限
• 要使用的文件名不应包含禁止的字符（

  /

  ，

  \

  ，

  *

  ，

  ：

  ，…，请参阅）
• 当您向文件写入内容时，该文件不应被其他人打开。别忘了检查一下

---

感谢您的快速回复。我确实有一个U:-驱动器的驱动器映射。这是我个人的。如何查看我是否有权限写入该网络或驱动器？那么，如果Excel文件是由其他人在同一网络上打开的？这是否意味着不可能使用它？是否也有可能我没有将宏正确链接到按钮或其他东西？我已经提到了所有可能的问题，没有驱动器映射这一事实是最紧迫的问题。我相信其他问题将不再重要：只要确保您有驱动器映射，所有其他问题将不再重要。祝你好运。好的，非常感谢。我将确保驱动器映射，希望这将解决问题。在你的帮助下，它无法解决问题，但我仍然非常感谢！问题是代码末尾的单元格引用C2包含一个无法保存为文件名的值，在本例中为5/12/2021。我把它改成了05122021，现在可以用了：）我的同事有一个语言设置，用斜杠而不是破折号来写日期。这就是问题所在。。。愚蠢的是，我没有调查此事，但现在一切都好了。@ThijmenVanDerMeulen:谢谢你的反馈。我相应地修改了我的答案。其他用户有权写入您要保存到的文件夹吗？我将每台特定计算机上的宏中的位置更改为他们自己的驱动器，以便他们可以将其保存到所需的位置。为什么不将

xlsx

文件保存到与工作簿相同的文件夹中？