Funkce Partition [VBA]
Vrátí řetězec, který značí, v jaké části vypočtené řady se číslo nachází.
Tato konstanta, funkce nebo objekt se povoluje příkazem Option VBASupport 1, který je umístěn v modulu před spustitelným programem.
Partition( Number, Start, Stop, Interval)
String
Number: Vyžadováno. Číslo, pro něž se má určit část řady.
Start: Vyžadováno. Celé číslo udávající dolní hodnotu rozmezí čísel.
Stop: Vyžadováno. Celé číslo udávající největší hodnotu rozmezí.
Interval: Vyžadováno. Celé číslo udávající velikost části v daném rozmezí čísel (mezi hodnotami Start a Stop).
Option VBASupport 1
Option Explicit
Sub Test_Partition
Dim retStr As String
retStr = Partition(20, 0, 98, 5)
print "20:24 číslo 20 se nachází v části: " & retStr
retStr = Partition(20, 0, 99, 1)
print " 20: 20 číslo 20 se nachází v části: " & retStr
retStr = Partition(120, 0, 99, 5)
print "100: číslo 120 se nachází v části: " & retStr
retStr = Partition(-5, 0, 99, 5)
print " : -1 číslo -5 se nachází v části: " & retStr
retStr = Partition(2, 0, 5, 2)
print " 2: 3 číslo 2 se nachází v části: " & retStr
End Sub