Excel - COmo colocar un boton automaticamente y copiar texto a otra casilla

   
Vista:

COmo colocar un boton automaticamente y copiar texto a otra casilla

Publicado por Juan286 (21 intervenciones) el 08/07/2012 13:55:09
Me explico tengo dos hojas en la hoja uno capturo los datos de la personas

Folio
Nombre
Direccion
etc

Enla hoja dos tengo un boton que usa para guardar la informacion algo asi como respaldo de lo que e capturado, pero ahora quiero que al momento de darle clic en guardar ademas de que copie los datos de la hoja 1 tambien me genere un boton enla ultima casilla o una lista desplegable que me permita copiar cierta informacion o casilla a la hoja1

Este es un ejemplo del codigo que usas para copiar los datos de la hoja 1 a la 2

Sub GUARDAR_DATOS()
Range("A2").Select
'bajamos hasta encontrar casilla vacia
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop

'grabamos datos
ActiveCell = Hoja6.Range("b7").Value
ActiveCell.Offset(0, 1) = Hoja6.Range("b8").Value

'copiamos a la hoja 2

End Sub

Como esta muy extenso solo coloque eso

de antemano 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
Imágen de perfil de Gonzalo Quintana

COmo colocar un boton automaticamente y copiar texto a otra casilla

Publicado por Gonzalo Quintana guliquin03@yahoo.com.ar (70 intervenciones) el 10/07/2012 19:56:46
Juan286
Se necesitaría ver todo el código que manejas para entender mejor lo que quieres realizar...
Por lo pronto, el código para generar un botón en tiempo de ejecución es el siguiente:
1
2
3
ActiveSheet.Buttons.Add(163.5, 104.25, 90, 42).Select 'Posicionamiento del Botón
    Selection.OnAction = "Macro1" 'Macro a Accionar
    Selection.Characters.Text = "Macro" 'Nombre que figura en Botón

Debes tener en cuenta de cambiarle los datos por los que tu necesitás...
Saludos,

Gonzalo
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

COmo colocar un boton automaticamente y copiar texto a otra casilla

Publicado por Juan286 (21 intervenciones) el 14/07/2012 14:57:16
Mira en la Hoja uno tengo los sigfuente datos
Folio XXXXXXXXXX
Nombre XXXXXX xXXXXXX XXXXXXXXXXXXXXX
Producto XXXX Fecha 12/12/2012
Descripcion XXXXXXXXXXX
Precio XXXXXXXXX

El cual en la hoja2 tengo un boton el cual utilizo guardar los datos los dators que guadoson los mismo
Folio Nombre Producto Fecha Des cripcion Precio
XXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXX XXXXXXXXXxx XXXXXXXXXXXXXx xXXXXXXXXX

Bueno lo que quiero hacer es el al momento de dar clic en guardar me envie los datos de Hoja1 a la Hoja2 lo cual ya hago.

Ahora ademas quiero tambien que aparesta un boton que diga copiar o algo asi k al darle clic me mande los datos pero de la hoja2 a la 1 o una forma de copiar los datos de la hoja2 a la Hoja1 .
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