>Hi there,
>
>Somebody knows how to have the first visible row in a grid to become the active one?

Run following code from button.click and it will give you a clue:

WITH thisform.grid1
 .setfocus
 nCounter=0
 DO while .relativerow<>1
  nCounter=nCounter+1
  .doscroll(1)
  IF nCounter>20 
   EXIT
  ENDIF
 ENDDO
 .refresh
ENDWITH