MACRO EXCEL QUE GUARDE datos de una celda en un archivo txt
hola amigo(a) necesito q me ayudes con una macro q pueda guardar los datos de una celda en una ruta especifica , un botón q copie para poder pegar en otra parte , un botón q copie una celda para pegarlo en otra parte , te dejo el ejemplo en un-archivo de excel para q me entiendas mejor el caso agradecería mucho tu ayuda ya que me urge poder hacer esto para poder usarlo en mi trabajo y ahorrar tiempo .
lima - perú
excel 2010
https://www.dropbox.com/s/5ty3hx53sbwopax/Libro1.xlsx
muchísimas gracias de antemano
2 Respuestas
Ya tengo la mayoría de macros, solo me falta la macro que al presionar el botón junto a la celda la copie.
Dame un par de días, porque está complicada.
muchas gracias amigo tomate los días q quiereas gracias
Como te comenté aún no he tenido tiempo de desarrollar la parte de selección de un botón y que copie la celda de la izquierda.
https://www.dropbox.com/s/2u67f1e2focunwb/viferdi_777.xlsm
Por el momento te paso sin esa macro. La cual la tengo pendiente.
Escribe estas macros... y asignalas una a una cada botón
Sub Copia01()
Cells(3, 2).Copy
End Sub
Sub Copia02()
Cells(4, 2).Copy
End Sub
Sub Copia03()
Cells(5, 2).Copy
End Sub
Sub Copia04()
Cells(6, 2).Copy
End Sub
Sub Copia05()
Cells(7, 2).Copy
End Sub
Sub Copia06()
Cells(8, 2).Copy
End Sub
Sub Copia07()
Cells(9, 2).Copy
End Sub
Sub Copia08()
Cells(10, 2).Copy
End Sub
Sub Copia09()
Cells(11, 2).Copy
End Sub
Sub Copia10()
Cells(12, 2).Copy
End Sub
Sub Copia11()
Cells(13, 2).Copy
End Sub
Sub CopiaTodo()
Range(Cells(3, 2), Cells(13, 2)).Copy
End Sub
Sub BorraTodo()
Range(Cells(3, 1), Cells(13, 2)).ClearContents
End Sub
Sub Graba1()
Dim nombrearchivo As String
Application.DisplayAlerts = False
nombrearchivo = "C:\Users\SERVER\Desktop\miarchivo.txt"
ActiveWorkbook.SaveAs Filename:=nombrearchivo, FileFormat:=xlTextMSDOS, CreateBackup:=False
Application.DisplayAlerts = True
End Sub
graCIAS
De nada
No olvides finalizar la pregunta