WorksheetFunction.ImReal (Excel)
Retorna o coeficiente real de um número complexo no formato de texto x + yi ou x + yj.
Use o método complexo para converter coeficientes reais e imaginários em um número complexo.
ImReal (Arg1)
Arg1: Inúm - um número complexo do qual se deseja obter o coeficiente real.
Dim dblImReal As Double
dblImReal = WorksheetFunction.ImReal(Arg1:=)