Visual Basic para Aplicaciones - Desbordamiento:MsgBox 82000001138 Mod 7

No sé como puedo obtener el resto de la división entre:
dividendo: 82000001138
divisor: 7
MsgBox 82000001138 Mod 7
ERROR de desbordamiento

DD = 82000001138#
d = 7#
c = Int(DD / d)
r = DD - (d * c)

Muchas Gracias. Me faltaba añadir # despues del 7.

Realmente el numero 82000001138 se descompone:
8200 que siempre es el mismo y
0001138 que no siempre es el mismo pero si que tiene 7 digitos
entonces el problema que tengo ahora es de tipos ya que al concatenar
DD=8200 & 0001138 & "#" obtengo un string
d = 7#
C = Int(DD / d) ' y aqui tengo el problema de tipos
R = DD - (d * C)

Me puedes dar una idea. Gracias

Prueba de definir la variable a la cual le asignas el resto como double en lugar de single.
Ademas asegurate de que el resto no es un numero periodico (¡de precisión infinita!)

Gracias.