EXCEL CON MACROS

29/05/2006 - 22:25 por YASNI | Informe spam
Tengo el Siguiente problema:

En la hoja nº1 , ingreso una cierta cantidad de datos, en donde tengo
tres botones (limpiar, ingresar, buscar). Esos registros tengo que
guardarlos en la hoja siguiente con el boto ingresar. Se como cambiarme
de hoja y guardar los registros, lo que no se es como ir haciendo que
me reconozca la celda activa que contiene el ultimo registro y que me
grabe en la siguiente vacia.
La otra preguanta cual seria el código, para buscar el registro ya
guardado.

Si pueden ayudarme , se los agradecería.

Muchas GRACIAS

YASNI
 

Leer las respuestas

#1 Héctor Miguel
30/05/2006 - 08:54 | Informe spam
hola, 'anonimo/a' !

Tengo el Siguiente problema:
En la hoja... 1, ingreso una cierta cantidad de datos, en donde tengo tres botones (limpiar, ingresar, buscar).
Esos registros tengo que guardarlos en la hoja siguiente con el boto ingresar.
Se como cambiarme de hoja y guardar los registros
lo que no se es... que me reconozca la celda activa que contiene el ultimo registro y que me grabe en la siguiente vacia.
La otra pregunta cual seria el codigo, para buscar el registro ya guardado.



suponiendo que la 'cierta cantidad de datos' de la hoja1 esta 'en linea' [celdas contiguas SIN celdas 'vacias']...
[y solo por mencionar una de entre varias alternativas o posibilidades]...

a) si las celdas van en vertical -misma columna- [p.e. desde 'A8:A12'] y suponiendo que se trata de 5 datos...
Worksheets("hoja2").Range("a65536").End(xlUp).Offset(1).Resize(, 5).Value = _
Application.Transpose(Worksheets("hoja1").Range("a8:a12").Value)

b) si las celdas van en horizontal -misma fila- [p.e. desde 'B2:F2'] y suponiendo que se trata de 5 datos...
Worksheets("hoja2").Range("a65536").End(xlUp).Offset(1).Resize(, 5).Value = _
Worksheets("hoja1").Range("b2:f2").Value

si la 'cierta cantidad de datos' de la hoja1... 'anda dispersa por ahi'... -?-
sera necesario que proporciones mayores datos :D

tambien seria conveniente si mencionas detalles mas... 'concretos' en cuanto a la busqueda de datos que necesitas ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares