A função VBA Sqr retorna a raiz quadrada de um número.
Sqr(número)
Usando a função Round para calcular a raiz quadrada de um número.
Sub SqrExample()
MySqr = Sqr(4) 'Retorna: 2
MySqr = Sqr(23) 'Retorna: 4.79583152331272
MySqr = Sqr(0) 'Retorna: 0
MySqr = Sqr(-4) 'Retorna um erro quando o código é executado
End Sub