刷新链接

时间:2016-12-23 08:59:28

标签: excel-vba vba excel

我在更新指向excel文件的链接时弹出一个选择文件窗口时遇到问题。我相信它是在刷新链接时保存目标文件引起的。

我有2台电脑。我打开文件" A"在第一个和文件" B"另一方面。

文件" A"运行这个宏:

application.enableevents = false
Do until(I set loop for couple minutes )
Range("a1").value = 1
save
range("a1).value = 2
save
Loop

文件B运行此宏:

range("b2").value = (link to File A, cell "a1")
z = 1
do until (runs for couple minutes)
Cells(z,1).value = range("b2").value
z = z+1
loop

所以基本上第一个文件不断改变单元格的值" a1"在1和2之间,每次都保存,而第二个不断刷新链接并记录链接的单元格值。

它可以工作几轮,然后会弹出一个选择文件窗口。

包含链接的单元格的确切公式:

"='[" & BAZAO.Name & "]" & "ZMIANY'" & "!a1"

在excel单元格中,它看起来像这样: “=' [BWP 215.xlsm] ZMIANY'!a1”

刷新链接的代码行:

BAZA.UpdateLink (BAZAZ.Range("C3").Value)

BAZA - 文件名B. BAZAZ.range(" c3")。value - 包含文件A的地址和名称

Range("b2").value  = "='[" & BAZAO.Name & "]" & "ZMIANY'" & "!a1"
„='[BWP 215.xlsm]ZMIANY'!a1”

有人可以告诉我如何禁止此选择文件窗口,或者是否有其他解决方法?

我认为它正在发生,因为在打开excel文件时,excel会使用生成的名称创建它的副本。保存更改并替换原始文件时,excel首先删除原始文件,然后将临时文件放在其位置,将名称更改为原始文件。 我想当我的宏在那些时刻之间碰到时,弹出选择文件窗口。 这是原因吗?

1 个答案:

答案 0 :(得分:0)

我想我找到了一个解决方法。 我没有使用单元格来跟踪文件的可用性,而是使代码创建了文件" inuse.txt"在"文件A"目录何时使用。 那么"文件B"只是通过dir命令检查该文件是否存在