Função Partition [VBA]

Devolve uma cadeia de caracteres indicando onde ocorre um número dentro de uma série de intervalos calculados.

Esta constante, função ou objeto é ativado através da instrução Option VBASupport 1, colocada antes do código executável do programa num módulo.

Sintaxe:

Partition( Number, Start, Stop, Interval)

Tipo de retorno:

String

Parâmetros:

Número: Obrigatório. O número que identifica a partição.

Início: Obrigatório. Um número inteiro que define o valor mínimo do intervalo de números.

Stop: Obrigatório. Um número inteiro que define o valor máximo do intervalo.

Intervalo: Obrigatório. Um número inteiro que especifica o tamanho das partições dentro do intervalo de números (entre Início e Fim).

Exemplo:


        Option VBASupport 1
        Option Explicit
        Sub Test_Partition
            Dim retStr As String
            retStr = Partition(20, 0, 98, 5)
            print "20:24  o número 20 ocorre no intervalo: " & retStr
            retStr = Partition(20, 0, 99, 1)
            print " 20: 20 o número 20 aparece no intervalo: " & retStr
            retStr = Partition(120, 0, 99, 5)
            imprimir  "100:  o número 120 ocorre no intervalo: " & retStr
            retStr = Partition(-5, 0, 99, 5)
            print "   : -1 o número -5 está presente no intervalo: " & retStr
            retStr = Partition(2, 0, 5, 2)
            print " 2: 3 o número 2 aparece no intervalo: " & retStr
        End Sub

Funções matemáticas do VBA