BUSQUEDA???
Publicado por Jorge Leon (63 intervenciones) el 13/04/2009 03:47:14
Hola amigos DWP, quiero realizar una busqueda de una clave de empleado en una tabla y lo que quiero es de que si no existe me busque la clave menor mas proxima y que se posisione en ese registro para poder dar de alta el nuevo registro, ya que tengo la tabla ordenada por clave, y quiero insertar un renglon en el lugar indicado en la tabla y registrar el nuevo empleado y que no pierda el orden, la busqueda la realiza asi:
Sheets("Personal Autorizado").Select
Range("a2").Select
Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
y cuando no lo encuentre????
de antemano muchas gracias
Sheets("Personal Autorizado").Select
Range("a2").Select
Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
y cuando no lo encuentre????
de antemano muchas gracias
Valora esta pregunta


0