En la msFlexGrid podias seleccionar programaticamente una fila, pero no lo reflejaba en el scroll. Osea que la fila seleccionada no se hacia visible de una. Solo sucedia despues de mover las flechas direccionales del teclado. No se si el msHFlexGrid se comporta igual ante eso. Para es ecaso. Resolvimos eso mandando un SendKeys (Codigo FlechaDireccional) dos veces, hacia arriba y hacia abajo para forzar la muestra del registro encontrado. Saludos y espero que te sirva CarlosMag
From: [email protected]: [email protected]: [vbusers] MSHFlexgridDate: Sat, 24 Jan 2009 10:41:04 -0300 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 AbadEnviado el: viernes, 23 de enero de 2009 19:32Para: vbusers List MemberAsunto: [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. No virus found in this incoming message.Checked by AVG - http://www.avg.comVersion: 8.0.176 / Virus Database: 270.10.13/1912 - Release Date: 23/01/2009 18:54 _________________________________________________________________ Adelántate a tu futuro. Ingresa ahora a MSN Astrología http://astrologia.latam.msn.com/msnlatam/
