Desactivar TextBox por codigo

hola, Juan !

Tengo este codigo en una hoja y no se por que cambiar mis interrogantes para desactivar el TextBox1
Alguna idea?

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
[M9] = 1
'Con este codigo activo el control TextBox2
OLEObjects("TextBox2").Activate
'Con que codigo desactivo el control TextBox1??????????????????
End Sub

- que significa "desactivar" el control textbox1 (???, ya no quieres que lo usen ?)

- y falta definir "el momento" en que quieres desactivarlo (o despues de "que" acciones ?)
pero prueba con algo como:
- un activecell.activate
- un sendkeys "{esc}"
- ???

saludos,
hector.

Gracias Héctor por contestar.
La noche me confunde, estaba utilizando un TextBox cuando lo que debía de
poner era una Label.
Es solo para ponerla como trasparente y del tamaño exacto de una celda, para
"dar la impresión"
al usuario que cliquea en la celda que está "debajo".
Con la etiqueta ya no tengo el problema de "editar" el TextBox cuando se
hace click, pero
aún así la etiqueta queda "resaltada" hasta que se mueve el ratón fuera de
ella.
¿Sería posible que después de hacer clic sobre una etiqueta esta quedara
como
antes de pulsar sin tener que mover el ratón fuera de ella?

Gracias y un saludo.-

"Héctor Miguel" escribió en el mensaje de
noticias news:

hola, Juan !

Tengo este codigo en una hoja y no se por que cambiar mis interrogantes
para desactivar el TextBox1
Alguna idea?

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
[M9] = 1
'Con este codigo activo el control TextBox2
OLEObjects("TextBox2").Activate
'Con que codigo desactivo el control TextBox1??????????????????
End Sub

- que significa "desactivar" el control textbox1 (???, ya no quieres que
lo usen ?)

- y falta definir "el momento" en que quieres desactivarlo (o despues de
"que" acciones ?)
pero prueba con algo como:
- un activecell.activate
- un sendkeys "{esc}"
- ???

saludos,
hector.

hola, Juan !

... estaba utilizando un TextBox cuando lo que debia de poner era una Label.
Es solo para ponerla como trasparente y del tamaño exacto de una celda
para "dar la impresion" al usuario que cliquea en la celda que esta "debajo".
Con la etiqueta ya no tengo el problema de "editar" el TextBox cuando se hace click
pero aun asi la etiqueta queda "resaltada" hasta que se mueve el ratón fuera de ella.

no le veo el sentido... quieres (o no) que el usuario seleccione "la celda" (debajo de un objeto incrustado) ???

Seria posible que despues de hacer clic sobre una etiqueta
esta quedara como antes de pulsar sin tener que mover el raton fuera de ella?

probaste alguna de las sugerencias anteriores ? => (se requiere usar macros)

- falta definir "el momento" en que quieres desactivarlo (o despues de "que" acciones ?)
pero prueba con algo como:
- un activecell.activate
- un sendkeys "{esc}"
- ???

saludos,
hector.