Change
.GetKey(i)
to
format$(.GetKey(i),"0.0%")