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