inserta el valor de una celda a un cuadro de texto y actuali

hola amigos saludos a todos quisiera que me ayuden con esta macro ,tengo una
ecuacion con cual obtengo el resutado en una celda este resultado debe de
mostrarse en un cuadro de texto ,y si lo caqmbio debe actualizarse , por
ejemplo
tego un valor de 30 en la celda A3 y en un cuadro de texto (llamado m)que este
relacionado a esta deberia decir X0 y si cambio el valor en la celda a A3
a un valor de 40 en el cuadro de texto debe cambiar a X@
quiero que sea en macro ya que se podria hacer con las celdas pero seria mas
limpio sin eso .esta macro es algo similar a
http://damianexcel.blogspot.com/2011/10 ... lores.html este es mas coplicado
intente modificarlo pero nada ...ayudenme por favor gracias por leer mi mensaje

El martes, 17 de julio de 2012 20:19:57 UTC+1, mario198501 escribió:

hola amigos saludos a todos quisiera que me ayuden con esta macro ,tengo una
ecuacion con cual obtengo el resutado en una celda este resultado debe de
mostrarse en un cuadro de texto ,y si lo caqmbio debe actualizarse , por
ejemplo
tego un valor de 30 en la celda A3 y en un cuadro de texto (llamado m)que este
relacionado a esta deberia decir X0 y si cambio el valor en la celda a A3
a un valor de 40 en el cuadro de texto debe cambiar a X@
quiero que sea en macro ya que se podria hacer con las celdas pero seria mas
limpio sin eso .esta macro es algo similar a
http://damianexcel.blogspot.com/2011/10 ... lores.html este es mas coplicado
intente modificarlo pero nada ...ayudenme por favor gracias por leer mi
mensaje

Esta macro creo que te servirá,
tienes que incluirla en el código del Worksheet

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 3 And Target.Column = 1 Then ' fila=3, columna=1
ActiveSheet.Shapes("m").OLEFormat.Object.Text = "X=" &
Range("A3").Value
End If
End Sub



Solo funciona cuando cambias algo en la celda A3 (Fila 3, Columna 1) ;-)

Saludos