Il VBA, se non ricordo male a memoria, mette a disposizione la funzione SGN(..) sicché basterebbe prendere int valore in somma con segno di sgn(valore).
La premessa sarebbe che sommando 1 si Arrotonda sempre per eccesso sia positivi che negativi... -4 > -5...
Nel caso però si voglia Arrotondare al "numero" assoluto più grande intero...
ValArrInt=Int(Valore+sgn(Valore))
Ovviamente se l'arrotonfamento va gestito alla cifra richiesta si deve gestire il moltiplicatore, ma a quel punto serve gestire il decimal e non Integer.
Spero di aver ricordato bene non ho il PC acceso.