Access - Copiar variable al portapapeles

Hola, lo que tengo es una lista de logins, y todos tienen la misma password. Como comodidad he querido poner un botón que me copiase la contraseña, pero sin que esta se vea.

He probado hacerlo de dos maneras:


La primera era poner un Cuadro de texto con mi contraseña y en Visible = No, pero da error porque al ir a coger no esta "activo", he probado ha hacer la chapuza de ponerle un rectángulo de color encima, pero al hacer foco la muestra.

Me!Contraseña.SetFocus
DoCmd.RunCommand acCmdCopy

La segunda he intentado crear una variable, y copiar esa variable al porta papeles, pero no he sabido, y no he encontrado nada como lo que yo quiero hacer.
Dim PASS As String
PASS = "HOLA"
PASS.SetFocus //Aquí da error, porque no es un objeto
DoCmd.RunCommand acCmdCopy


¿Alguna idea nueva o solución a estas?
Solo quiero copiar un pequeño texto y que este no se vea por ningún lado.


Un saludo

mirate la solucion de José Bengoechea

porque a lo que parece hay que seleccionar el texto, no vale con decirle el objeto




http://microsoft.public.es.access.narkive.com/YMCnDrIq/copiar-variable-a-portapapeles

Me.MiControl.SetFocus
Me.MiControl.SelStart = 0
Me.MiControl.SelLength = Len(Me.MiControl)
DoCmd.RunCommand acCmdCopy
--
Saludos

José Bengoechea Ibaceta [MS-MVP Access]