Disculpen el code que postie no va a funcionar porque le falta una parte... Escribo en un post nuevo xq si modifico no le va a avisar a los que hayan usado este code. Agreguen esto al modulo:
Código [Seleccionar]
Public Type LUID
UsedPart As Long
IgnoredForNowHigh32BitPart As Long
End Type