FUNCION
Publicado por Jorge Leon (57 intervenciones) el 22/04/2009 02:09:52
hola amigos DWP estoy realizando una pequeña aplicacion y poco a poco he conseguido varias cosa, lo que pretendo es buscar claves de personal y si no estan en una hoja quiero poder darlos de alta, la busqueda la realiza en un boton
Sheets("Personal Autorizado").Select
Range("a2").Select
Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
si lo encuentra me pone los datos en un formulario
pero si no lo encuentra quiero que busque el numero de empleado menor mas proximo al que teclee, por ejemplo si tecleo el 1000 y no se encuentra pero existe el 999 se posicione en ese registro para agregar un renglon en la tabla y registrar el nuevo empleado, ya que la tabla se encuentra ordenada por clave de empleado de menor a mayor, se que existe una funcion o codigo buscarv(), pero no he podido encontrar nada que me diga como utilizar esta funcion y se posisione en el menor mas proximo????? ya busque en la ayuda y en el foro pero no encuentro ningun ejemplo............ de antemano 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
si lo encuentra me pone los datos en un formulario
pero si no lo encuentra quiero que busque el numero de empleado menor mas proximo al que teclee, por ejemplo si tecleo el 1000 y no se encuentra pero existe el 999 se posicione en ese registro para agregar un renglon en la tabla y registrar el nuevo empleado, ya que la tabla se encuentra ordenada por clave de empleado de menor a mayor, se que existe una funcion o codigo buscarv(), pero no he podido encontrar nada que me diga como utilizar esta funcion y se posisione en el menor mas proximo????? ya busque en la ayuda y en el foro pero no encuentro ningun ejemplo............ de antemano gracias
Valora esta pregunta
0
