不能通过宏上传到Sharepoint

Question

我的宏有一个小问题，目前让我感到绝望。 该宏应该将文件保存到特定位置。 marko 从单元格 A2 读取值，然后保存相应的 .txt 文件。文件名是单元格 a2 中的值。 这些文件在公司内部服务器驱动器上保存一次，然后另外上传到两个共享点文件夹。一个文件夹分配给团队，另一个文件夹分配给私人用户文件夹。 到目前为止，该宏对我有用。对于运行相同宏的同事，该文件仅保存在本地服务器和分配给团队的文件夹中。 （第一行和第二行使用命令“ActiveWorkbook.save as”） 第三行不执行。但执行代码时并没有出现错误信息。如果我们尝试将文件保存在硬盘 C 上，我的同事也不会执行此操作。

有人可以帮助我们并解释错误在哪里吗？

提前致谢。

以下是代码片段：

fileExtension = Right(wk.FullName, Len(wk.FullName) - InStrRev(wk.FullName, "."))
    wk.Activate
    
    If wk.Name <> ThisWorkbook.Name Then
        
        If fileExtension = "txt" Then    
        
            If Range("A2").Value <> "" Then
                    y = Range("a2").Value
                    Dateiname = Trim(Mid(y, 24, 120))
                    ActiveWorkbook.SaveAs Filename:="G:\yxy\1 yyy\Dashboard\Datengrundlage\" & Dateiname, Local:=True
                    ActiveWorkbook.SaveAs Filename:="https://yyyyroup.sharepoint.com/sites/SOyyyy-S_OP/Shared Documents/S_OP/Fertigungskonzept\" & Dateiname, Local:=True
                    ActiveWorkbook.SaveAs Filename:="https://yyygroup-my.sharepoint.com/personal/yyy/Documents/yyy/" & Dateiname, Local:=True
                    
                    
                    ActiveWorkbook.Close
            Else
                    y = Range("A3").Value
                    Dateiname = Trim(Mid(y, 30, 120))
                    ActiveWorkbook.SaveAs Filename:="G:\yxy\1 yyy\Dashboard\Datengrundlage\" & Dateiname, Local:=True
                    ActiveWorkbook.SaveAs Filename:="https://yyyyroup.sharepoint.com/sites/SOyyyy-S_OP/Shared Documents/S_OP/Fertigungskonzept\" & Dateiname, Local:=True
                    ActiveWorkbook.SaveAs Filename:="https://yyygroup-my.sharepoint.com/personal/yyy/Documents/yyy/" & Dateiname, Local:=True
                    
                    
                    ActiveWorkbook.Close
            
               End If
        Else

更改代码，尝试保存到其他文件夹

Answer 1

大家。感谢您的快速回复和解决问题的建议。

但这似乎是另一个问题。我们调试宏代码的时候就发现了。逐步检查宏代码，代码运行良好。数据存储在单独的共享点文件夹中，如果我们通过定义的快捷方式执行宏则不会。我们是否必须将宏暂停特定的定义时间，或者还有其他想法吗？