Cell focus i msflexgrid

hej

du skal have fat i følgende properties: toprow og leftcol. Og du er velkommen til at bruge følgende sub:

Du bruger den ved at kalde den vha eksempelvis:

call changeRowCol(msflexgrid1, 30, 30)

Private Sub changeRowCol(ditFlexgrid As MSFlexGrid, row As Integer, col As Integer)
   
    If ditFlexgrid.ColIsVisible(col) = False Or ditFlexgrid.RowIsVisible(row) = False Then
       
        ditFlexgrid.LeftCol = col - 1 'her kan du selv trække fra og til for at finde midten
        ditFlexgrid.TopRow = row - 1 'her kan du selv trække fra og til for at finde midten
    End If
   
    With ditFlexgrid
        .col = col
        .row = row
        .RowSel = row
        .ColSel = col
    End With
   
    ditFlexgrid.SetFocus
End Sub

/hiks

Det virker ikke..
Nå jeg kører scroll helt ud til venstre og klikker på col nr 3 fra højre.
Flytter cellen sig selv til midten på skærm. Og nå jeg så skifter til næste flexgrid.
Står den hvor jeg forlod den

jeg er ikke helt sikker på at jeg forstår hvad du mener.

men du er jo nødt til at indarbejde ovenstående sub med rowselchange og scroll eventsene så det passer til det du vil lave. Eksemplet jeg har skrevet til dig ("call changeRowCol(msflexgrid1, 30, 30)") er jo bare et eksempel på hvordan du bruger sub og flytter focus til celle 30,30. Det skal du jo have ændret til hvordan du vil bruge det.

/hiks

Lukker