Si, gracias!!! Me re-sirvió esta función. Saludos,
Claudia. _____ De: [email protected] [mailto:[email protected]] En nombre de Diego Spinedi Enviado el: Sábado, 24 de Enero de 2009 11:41 a.m. Para: vbusers List Member Asunto: [vbusers] MSHFlexgrid Claudia, utilza esta sentencia en un boton buscar y te deberia funcionar. Dim i As Long Dim Cadena As String Dim DesdePos As Long If TextBuscarNom.Text <> "" Then Cadena = TextBuscarNom.Text For i = 1 To GrillaChequesTerceros.Rows - 2 If Mid(GrillaChequesTerceros.TextMatrix(i, 4), 1, 1) = Mid(Cadena, 1, 1) Then GrillaChequesTerceros.row = i GrillaChequesTerceros.RowSel = i GrillaChequesTerceros.ColSel = 7 GrillaChequesTerceros.TopRow = i Exit For End If Next i Else Mensaje "Debe ingresar texto para la búsqueda" TextBuscarNom.SetFocus End If Saludos cordiales, Diego Spinedi _____ De: [email protected] [mailto:[email protected]] En nombre de Claudia Abad Enviado el: viernes, 23 de enero de 2009 19:32 Para: vbusers List Member Asunto: [vbusers] MSHFlexgrid Gente, Ustedes siempre me salvan! A ver si me dan una mano con esto Tengo una MSHFlexgrid y un textbox en un formulario El usuario ingresa en el textbox el texto que quiere buscar en la grilla si? Bueno, lo que quiero lograr es que la grilla se mueva hasta la fila donde se encontró el texto buscado. Onda como hace el Excel cuando buscas algo. Saben como hacerlo? Desde ya, miles de gracias!!! Claudia. __________ Información de NOD32, revisión 3795 (20090123) __________ Este mensaje ha sido analizado con NOD32 antivirus system http://www.nod32.com No virus found in this incoming message. Checked by AVG - http://www.avg.com Version: 8.0.176 / Virus Database: 270.10.13/1912 - Release Date: 23/01/2009 18:54
