文件位置更改时更新形状中的超链接

时间:2013-04-23 03:28:22

标签: vba hyperlink path updates shapes

我有一个流程图,它使用各种excel形状直观地表示从头到尾的数据生成过程,即。从数据输入到分析环境到数据输出到提交文件。我已经使用vba将图中的许多形状超链接到工作簿中的另一个工作表(使用thisworkbook.fullname),其中包含每个形状文本中包含的缩写的定义,例如C1列在一个形状中,超链接带你到定义选项卡单元格,其中C1被定义为控制点1。超链接工作时xlsm工作簿在我的家庭位置,我保存文件,但如果我将文件保存到另一个位置(他们尝试打开我的原始工作簿)它们不起作用。是否像将超链接地址更改为thisworkbook.filename并删除路径以使其工作一样简单?我是否需要创建一个宏,该宏将自动查找旧的超链接地址,并将其替换为包含超链接的工作簿中每个形状的当前文件位置的新地址。路径可能在将来发生变化,因此希望它是相对的而不是固定的 - 例如,如果我将文件保存到共享点而另一个用户将副本保存到其主目录,我仍然希望链接在它们中任何一个都可用地点。例如,一些超链接转到“sheet1”,一些转到“sheet2”,但是1和1表。 2都位于同一工作簿中。请帮忙!

1 个答案:

答案 0 :(得分:0)

ActiveWorkbook.Name解决了问题,用它替换ThisWorkbook.FullName,超链接在其他目录中工作。