資料結構
網路
關係型資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
服裝設計
法律研究如何在不刪除格式的情況下移除超連結？
連結可以幫助您更快地訪問不同的位置、網站或檔案。但是，有時您可能希望在從 Excel 工作表中移除超連結的同時保留原始格式。手動移除超連結可能需要一段時間，尤其是在大型資料集中。
在本教程結束時，無論您的 Excel 技能水平如何，您都將具備從 Excel 工作表中熟練刪除超連結並保留資料外觀所需的能力。因此，讓我們開始並瞭解如何有效地從 Excel 中刪除超連結而不會損壞格式！
在不移除格式的情況下移除超連結
這裡，我們將首先建立一個 VBA 模組，然後執行它來完成任務。因此，讓我們看看一個簡單的過程，瞭解如何在 Excel 中移除超連結而不移除格式。
步驟 1
假設您有一個包含超連結列表的 Excel 表格。
首先，右鍵單擊工作表名稱並選擇“檢視程式碼”以開啟 VBA 應用程式。
右鍵點選 > 檢視程式碼。
步驟 2
然後點選“插入”並選擇“模組”，然後將以下程式碼複製到文字框中。
插入 > 模組 > 複製。
程式碼
Sub RemoveHlinks()
Dim Rng As Range
Dim WorkRng As Range
Dim TempRng As Range
Dim UsedRng As Range
Dim xLink As Hyperlink
On Error Resume Next
xTitleId = "Remove Hyperlinks Formatting"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set UsedRng = Application.ActiveSheet.UsedRange
For Each xLink In WorkRng.Hyperlinks
Set TempRng = Cells(1, UsedRng.Column + UsedRng.Columns.Count)
Set Rng = xLink.Range
Rng.Copy TempRng
Rng.ClearHyperlinks
Set TempRng = TempRng.Resize(Rng.Rows.Count, Rng.Columns.Count)
TempRng.Copy
Rng.PasteSpecial xlPasteFormats
TempRng.Clear
Next
End Sub
步驟 3
然後點選 F5 執行模組。然後選擇單元格範圍並點選“確定”以完成任務。
F5 > 選擇單元格 > 確定
這就是您在 Excel 中移除超連結的方式。
結論
在本教程中，我們使用了一個簡單的示例來演示如何在 Excel 中移除超連結而不移除格式以突出顯示特定資料集。
更新於： 2023年9月7日
160 次檢視
廣告