excel - 非表示, 数式バーの数式

Question

Visual Basic で以下のコードを使用すると、ワークシートHYPERLINKの数式にパーツが表示されます。を数式バーに表示しbarたいだけです。"TextHere"

どのコードを追加できますか? 保護タブでプロパティを変更して非表示にしようとしましたが、TEXT を編集できなくなりました。引き続き編集しやすくしたいと思います。

Sub IndexingSheets()
    Sheets(1).Range("A1").Formula = _
    "=HYPERLINK(""#" & ThisWorkbook.Sheets(2).Name & "!A2"", ""TextHere"")"
End Sub