Hi, Paul!

Do you mean like this?
[VBA]
Sub One()
Dim LValue As Range

Set LValue = Range("a1")

.Value = Format(0.981, "Percent")


End Sub
[/VBA]