Excel VBA转换文本到超链接更改表格字体格式

我有一个完美的button。 它做我想要它做的，将列中的条目转换为超链接。 但是在处理之后，它会把所有的表格格式化成行高，字体types，字体大小等等。

Dim RITMRow As Long Dim ws1 As Worksheet Dim RITMstorage As String Dim LastRow As Long Set ws1 = Sheets("Tracker") LastRow = ws1.Range("A" & Rows.Count).End(xlUp).Row For RITMRow = 2 To LastRow RITMstorage = ws1.Range("A" & RITMRow).Value ws1.Range("A" & RITMRow).Hyperlinks.Add Anchor:=ws1.Range("A" & RITMRow), _ Address:="https://snow.ubs.net/sc_req_item.do?sys_id=" & RITMstorage, _ ScreenTip:="Request Number", _ TextToDisplay:=RITMstorage Next RITMRow end sub 

我能做些什么来阻止它搞乱表格格式？ 谢谢。