Buscar un valor

06/08/2003 - 16:31 por Adolfo Fernández | Informe spam
Hola gente

Utilizo el siguiente código para buscar un valor (sacado integramente del
grabador), y funciona perfectamente con números enteros, pero necesito que
sean con decimales y hay casca.

¿Alguien me puede hechar una mano?
Private Sub CBBUSCAR_Click()

a = TBValorBuscar.Text
Cells.Find(What:=a, After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False).Activate
Cells.FindNext(After:=ActiveCell).Activate
End Sub

Y ya que estamos ¿cómo se hace para que al pulsar sobre un cuadro de texto
el contenido que hay en el se borre?,
y por ultimo, ¿cómo tendría definir el valor de una variable con en
contenido de dos cuadros de texto? El tema es que tengo una parte fija y una
parte variable y ya con tal de no teclear más de lo necesario ..

De todas formas lo que mas me urge es saber como hay que hacer para porder
buscar valores decimales.

Un saludo y gracias por anticipado.

Adolfo
 

Leer las respuestas

#1 Adolfo Fernández
06/08/2003 - 17:36 | Informe spam
Me respondo a mi mismo, si acepta valores decimales, el problema es que yo
los metia con coma, en vez de con punto y claro . el calor.

De todas formas queda pendiente lo de borrar el contenido de un cuadro de
texto al pulsar sobre el, a ver si hay alguien que me pueda explicar como se
hace.

Y lo de definir una variable con el contenido de dos cuadros de texto
también es algo que estaría bien saber como se hace.

Un saludo,
Adolfo

"Adolfo Fernández" escribió en el mensaje
news:
Hola gente

Utilizo el siguiente código para buscar un valor (sacado integramente del
grabador), y funciona perfectamente con números enteros, pero necesito


que
sean con decimales y hay casca.

¿Alguien me puede hechar una mano?
Private Sub CBBUSCAR_Click()

a = TBValorBuscar.Text
Cells.Find(What:=a, After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False).Activate
Cells.FindNext(After:=ActiveCell).Activate
End Sub

Y ya que estamos ¿cómo se hace para que al pulsar sobre un cuadro de texto
el contenido que hay en el se borre?,
y por ultimo, ¿cómo tendría definir el valor de una variable con en
contenido de dos cuadros de texto? El tema es que tengo una parte fija y


una
parte variable y ya con tal de no teclear más de lo necesario ..

De todas formas lo que mas me urge es saber como hay que hacer para porder
buscar valores decimales.

Un saludo y gracias por anticipado.

Adolfo


Preguntas similares