PPT更改路径文件链接excel文件与VBA

Question

我有一个关于链接的Excel文件到Powerpoint演示文稿的问题。 Excel文件托管在外部服务器上，该服务器分配给公司所有PC上的驱动器号。问题是Excel文件的链接将随机更改为它在外部服务器上的位置。

我在宏中添加了一个解决方法：

If Left$(strPath, 3) <> text1 And Len(strPath) > 0 Then
    GetFilenameFromPath = text1 + strPath
End If

我遇到的问题是这段代码：

> df
     geneID Sample.290
1         1  0.4018499
2        10  0.2694255
3       100  1.4441846
4      1000 13.7652753
5     10000  2.1552100
6 100008586  0.2358481

它不断地将text1添加到我的路径中，而当text1当前不在路径的前3个字符中时，它应该这样做。

有人可以帮我弄清楚我做错了什么吗？

提前致谢！

Answer 1

VBA中的文本比较有时会令人恼火。而不是使用

if Left$(strPath, 3) <> text1

试试这个：

If StrComp(Left$(StrPath,3),text1) <> 0

如果这不起作用，试试这个：

If InStr(1,Left$(StrPath,3),text1) = 0