Nur gerade Zahlen eintragen (VBA)

dim Merker as Integer

Cells(a, 1).select
Merker = Activecell.value / 2
Cells(a, 22).select
Activecell.value = Activecell.value + Merker

Da der Merker ja durch 2 geteilt wird können ,0 oder ,5 Zahlen rauskommen ... ich will in der Zelle 22 aber nur gerade Zalhen ohne Kommastelle drin haben.

Wie mache ich es das die ,5 Beträge automatisch aufgerundet werden bevor sie übertragen werden ?
DANKE !!!