VBA entero para duplicar

Debug.Print CDbl(myLong)
Debug.Print CDbl(myInteger)
VasteMonde