この世で最高のコードを見かけた

With Range("F27:F56")
.Value = .Value
End With