https://foro.gambas-es.org/viewtopic.php?f=1&t=8118&p=48926#p48926 ----------------------------------- gambafeliz Miercoles, 24 Junio 2020, 14:47 Re: Ver Texto Al Posicionarse Con El Ratón Encima De Celda ----------------------------------- Este es el código sin pulir sin invertigar las columnas a fondo pero que funciona perfecto: Explico el ejemplo, se trata de un GridView1 con 6 filas y 2 columnas en un formulario. [code] Public Sub GridView1_MouseMove() Dim iCW0, iCW1 As Integer ' Ejemplo para dos columnas, 0 y 1 iCW0 = GridView1[0, 0].W ' variable integer para recuperar el ancho de la columna (C=Columan, W=Ancho) en fila 0 iCW1 = GridView1[0, 1].W ' variable integer para recuperar el ancho de la columna (C=Columan, W=Ancho) en fila 1 ' Los Bordes númericos y del header = 20px, para este ejemplo. Label1.Text = Int((Mouse.ScreenY - GridView1.ScreenY) / 20) - 1 ' [-1] es para obtener Row ' Comparo la coordenada del mouse con: ' 1.Posición donde esta el GridView1 + 20px del borde donde esta numerada la fila ' 2.Posición donde esta el GridView1 + 20px del borde donde esta numerada la fila + Ancho de la columna 0 If Mouse.ScreenX > (GridView1.ScreenX + 20) And Mouse.ScreenX < (GridView1.ScreenX + 20 + iCW0) Then Label2.Text = 0 Else Label2.Text = 1 Endif ' Ya tenemos la fila y la columna mapeada ahora solo queda poner la información If CInt(Label1.Text) > -1 And CInt(Label1.Text) < 6 Then Label3.Text = GridView1[CInt(Label1.Text), CInt(Label2.Text)].Text Endif End [/code] Espero que lo entendáis bien, sino por favor pregunten sin ningún problema, cuando lo mejore lo añadiré. Saludos