vale mirad

dir = VarPtr(A0)
dir = dir + 2
CopyMemory ByVal VarPtr(destino), ByVal dir, 10
Debug.Print destino
e puesto 10 bytes y solamente necesito los 2!
significa que estuviera accedienco a memoria prohibida de otra variable o mas de otro programa

y lo peor es que me da correcto
