Access - Copiar y Pegar de un cuadro de texto a otro en un formulario.

 
Vista:
sin imagen de perfil

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por Osvaldo (3 intervenciones) el 07/09/2014 23:01:07
Hola soy nuevo en el foro y estoy trabajando con access en un proyecto personal. Tengo un formulario donde tengo dos cuadros de texto, lo que necesito es copiar el contenido del cuadro 1 y pegarlo en el cuadro 2 mediante un botón. desde ya muchas gracias......
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 756
Plata
Ha mantenido su posición en Access (en relación al último mes)
Gráfica de Access

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por Jesús Manuel (134 intervenciones) el 08/09/2014 11:32:55
Si tus cuadros de texto se llaman Texto1 y Texto2 y el botón CmdTexto, solo tendrías que insertar el siguiente código en el evento Click del botón:

Texto2 = Texto1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por JOSE (830 intervenciones) el 08/09/2014 12:54:41
EN TODOS LOS CASOS
Forms![NOMBRE-FORMULARIO2]!TEXTO2 =Forms![NOMBRE-FORMULARIO1]!TEXTO1


DESDE EL FORMULARIO 1
Forms![NOMBRE-FORMULARIO2]!TEXTO2 =TEXTO1

DESDE EL FORMULARIO 2

TEXTO2 =Forms![NOMBRE-FORMULARIO1]!TEXTO1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por Osvaldo (3 intervenciones) el 08/09/2014 16:46:38
ok lo pruebo y les comento, había intentado con:

1
2
3
4
5
6
7
Private Sub copy_t_Click()
Dim MiClipboard, plazo As String
MiClipboard = Tasa_Pesos_
Me.Tasa_Pesos = MiClipboard
plazo = 30
Me.plazo_ = plazo
End Sub


por que necesito dos funciones. funciona pero me da un error cuando el cuadro de texto no tiene contenido.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por Osvaldo (3 intervenciones) el 09/09/2014 06:11:22
Bueno al final lo resolví con este código de modo que si el cuadro de texto esta vació no funciona el botón y si existe un valor lo copia pero a su ves copia 30 a otro cuadro.

Lo que me indicaron mas arriba no lo pude hacer funcionar ....... seguro me esta faltando algo voy a seguir investigando muchas gracias.

1
2
3
4
5
6
7
8
9
10
11
Private Sub copy_t_Click()
Dim vTexto As Variant
vTexto = Me.Tasa_Pesos_.Value
If Not IsNull(vTexto) Then
Dim MiClipboard, plazo As String
MiClipboard = Tasa_Pesos_
Me.Tasa_Pesos = MiClipboard
plazo = 30
Me.plazo_ = plazo
End If
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Copiar y Pegar de un cuadro de texto a otro en un formulario.

Publicado por JOSE (830 intervenciones) el 09/09/2014 20:48:57
EN DOS PALABRAS:


IN --- PRESIONANTE
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar