Interesantno je da funkcija ROUND u VBA radi kao što tebi treba (za razliku od EXCEL ROUND funkcije)! To može da ti posluži da napraviš svoju funkciju MyRound koja će da radi kako tebi treba
Code:
Public Function MyRound(dValue As Double, numDigits As Integer)
'Zaokurživanje logikom parni broj
'
MyRound = Round(dValue, numDigits)
End Function
Smesti ovu funkciju u Personal workbook i biće dostupna u svim radnim sveskama. Ili još bolje snimi kao Add-In u koji ćeš moći da dodaješ još neke korisničke funkcije. Add-in je potrebno ukjučiti da bi ti njegove funkcije bile dostupne. Funkciju koju si dodao naći ćeš u kategoriji User Defined u Insert Function dijalogu.
[Ovu poruku je menjao Jpeca dana 02.04.2008. u 13:14 GMT+1]
Nije to loše Rembrante, samo što ne bi dodao još malo boje?