excel “我的修补程序、我的文件和新名称”出现问题

lokaqttq 于 2022-12-19 发布在其他

关注(0)|答案(1)|浏览(145)

大家好，我有这个代码和代码的工作完美，但当代码在另一台计算机上运行时，它抛出错误“命名MyPath & MyFile为MyPath & NewName”，现在我想知道为什么会发生这种情况，有更好的解决方案或？

Sub Zamjena_Imena()
    MyPath = "G:\00 - MIP_AUTO_EXPORT"
    MyFile = "mata.xml"
    NewName = Range("F1")
    Name MyPath & MyFile As MyPath & NewName
    Sheets("BAZA_MIP").Select
    Range("F1").Select
End Sub

excel

来源：https://stackoverflow.com/questions/74847822/problem-with-my-patch-my-file-and-newname

1条答案

按热度按时间

3z6pesqy1#

请尝试使用以下方法：

Sub Zamjena_Imena()
    MyPath = "G:\00 - MIP_AUTO_EXPORT"
    MyFile = "mata.xml"
    NewName = Worksheets("CODE").Range("F1").Value
    If Right(MyPath, 1) <> "\" Then MyPath = MyPath & "\"
    Debug.Print "Attempting to rename: [" & MyPath & MyFile & "]"
    Debug.Print "to : [" & MyPath & NewName & "]"
    Name MyPath & MyFile As MyPath & NewName
    Sheets("BAZA_MIP").Activate
    Sheets("BAZA_MIP").Range("F1").Select
End Sub

范围现在已限定，消除了歧义。
如果失败，上面的方法至少会告诉您（通过查看即时窗口）它正在尝试做什么。

赞(0）回复(0）举报 2022-12-19

我来回答

excel “我的修补程序、我的文件和新名称”出现问题

1条答案

相关问题

热门标签

最新问答