hola,
tengo el siguiente código que se me generó guardando una macro que me
interesa:
////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////
//////////
Range("A2:A50").Select
Selection.Copy
Range("B2").Select
ActiveSheet.Paste
Selection.Replace What:="001", Replacement:="002", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Application.CutCopyMode = False
Selection.Copy
Range("C2").Select **********
ActiveSheet.Paste
Selection.Replace What:="002", Replacement:="003", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////
//////////
lo que hace es en la columna A tengo determinados datos, de los que me
interesa poner en la columna B los mismos pero reemplazando 001 por 002, asi
sucesivamente para la columna C 003, D004, etc.etc...
quiero armar el código para ponerlo en un botón,
puedo copiarlo muchas veces e ir cambiando el "C2" por "D2" "E2", ETC..y los
002, por 003 004, etc...
pero sé que con un for lo arreglo en una linea, el problema es como puedo
iterar con las columnas?? es decir en la linea que le puse el ********
tendría que poner algo como range(X).select y un for desde B2 hasta Z2?¿
Leer las respuestas