About Me
Com tecnologia do Blogger.
Seguidores
Estatisticas
2006-08-07
VBA: Ainda o Operador de Divisão Inteiro (\)
4:41 da tarde |
Publicada por
JRod - PORTUGAL |
Editar mensagem
Sabendo como funciona o Operador de Divisão Inteiro (\), então, podemos construir uma UDF, que mais não é do que a Função do Excel denominada QUOTIENT().
Vejamos o exemplo no seguinte screenshot:
O Código da Função IntDiv():
Function IntDiv(ByVal vStr As Double, vStr1 As Double) As Double
Dim oStr As String
oStr = vStr \ vStr1
IntDiv = oStr
End Function
Nota -
Vejamos o exemplo no seguinte screenshot:
O Código da Função IntDiv():
Function IntDiv(ByVal vStr As Double, vStr1 As Double) As Double
Dim oStr As String
oStr = vStr \ vStr1
IntDiv = oStr
End Function
Nota -
Como se pode verificar, é indiferente colocar directamente o valor do dividendo e do divisor ou apenas colocar o endereço das respectivas células que contêm os valores mencionados.