excel2007批量修改超鏈接的方法
excel2007批量修改超鏈接的方法
Excel中如何把超鏈接進(jìn)行批量修改呢?下面是由學(xué)習(xí)啦小編分享的excel2007批量修改超鏈接的方法,以供大家閱讀和學(xué)習(xí)。
excel2007批量修改超鏈接的方法:
批量修改超鏈接步驟1:如圖所示,新建一個(gè)Excel,輸入數(shù)據(jù);
批量修改超鏈接步驟2:選擇“插入”選項(xiàng)卡,點(diǎn)擊“鏈接”選項(xiàng)的“超鏈接”插入鏈接文檔。
批量修改超鏈接步驟3:當(dāng)僅我們移動(dòng)文件或是插入文檔的位置時(shí),會(huì)彈出“無法打開指定的文件”的提示框,這時(shí)就需要修改鏈接地址。
批量修改超鏈接步驟4:選擇“開發(fā)工具”選項(xiàng)卡,點(diǎn)擊“代碼”選項(xiàng)的“宏安全性”;
批量修改超鏈接步驟5:彈出“信任中心”窗口;
批量修改超鏈接步驟6:在“信任中心”窗口中,選擇“宏設(shè)置”選項(xiàng)卡→點(diǎn)擊“宏設(shè)置”選項(xiàng)中的“啟用所有宏”單選項(xiàng)→點(diǎn)擊“確定”。
批量修改超鏈接步驟7:回到Excel中,選擇“開發(fā)工具”選項(xiàng)卡,點(diǎn)擊“控件”選項(xiàng)的“查看代碼”;
批量修改超鏈接步驟8:彈出Excel的VB窗口“Microsoft Visual Basic - 新建 Microsoft Office Excel 工作表”;
批量修改超鏈接步驟9:在VB窗口中,選擇需修改超鏈接的Sheet頁;
批量修改超鏈接步驟10:在Sheet1(代碼)窗口中,輸入下列代碼:
Sub ChangeHyperlink()
For Each c In ActiveSheet.Hyperlinks
c.Address = Replace(c.Address, "新建文件夾\", "F:\ZHOUMIN\操 作文檔\Excel\新建文件夾\")
Next
End Sub
說明:如圖所示,代碼中,第一個(gè)引號(hào)的內(nèi)容為超鏈接的原始路徑,第二個(gè)引號(hào)的內(nèi)容為現(xiàn)在的路徑。
批量修改超鏈接步驟11:關(guān)閉VB窗口。
批量修改超鏈接步驟12:回到Excel中,選擇“開發(fā)工具”選項(xiàng)卡,點(diǎn)擊“代碼”選項(xiàng)的“宏”;
批量修改超鏈接步驟13:彈出“宏”設(shè)置窗口;
批量修改超鏈接步驟14:在宏名中輸入“Sheet名.方法名”,如“Sheet1.ChangeHyperlink”;
批量修改超鏈接步驟15:點(diǎn)擊“執(zhí)行”。
批量修改超鏈接步驟16:關(guān)閉“宏”設(shè)置窗口,回到Excel中,隨意打開一個(gè)超鏈接,能成功打開鏈接文檔,則超鏈接修改成功。
批量修改超鏈接步驟17:因?yàn)樵O(shè)置了宏,所有在保存或關(guān)閉Excel的時(shí)候,會(huì)彈出隱私問題警告提示框,如圖所示;
批量修改超鏈接步驟18:為了讓提示框不在彈出,可以進(jìn)入“開發(fā)工具”選項(xiàng)卡,點(diǎn)擊“代碼”選項(xiàng)的“宏”,選中宏名,點(diǎn)擊刪除即可。
批量修改超鏈接步驟19:關(guān)閉Excel,重新打開,就不會(huì)再彈出提示框了。