problema con informe

[Koudelka]

En access yo tengo un informe que me hace una suma total de horas. El caso es que necesito que me muestre las horas redondeadas, por lo que en principio había creado un nuevo campo que cogiese el campo de la suma y lo mosrase ya redondeado.

Para explicarme mejor, tengo un campo llamado HorasTotales, cuyo origen de datos es =TimeToString(Suma([horas])). Después tengo un campo de texto llamado HorasTotales2 en el que no tiene nada y quiero mostrar las horas redondeadas.

Se me había ocurrido poner algo al abrir el informe, pero mis intentos acaban en fracaso, por lo que ya no se me ocurre nada más... En el informe tengo puesto lo siguiente:


Private Sub Report_Open(Cancel As Integer)
If (Minuto(Me.HorasTotales) > 30) Then
Me.HorasTotales2 = hora(HorasTotales) & ":" & (Minuto(Me.HorasTotales) = 30)
Else
Me.HorasTotales2 = Me.HorasTotales
End If
End Sub

Con esto lo que quiero es redondear los minutos (quiero empezar por ahí, porque si no me sale esto, después no lo puedo pulir >.<). Si los minutos pasan de 30, que se ponga a 30 minutos...