Lparameters nColIndex Local llChangingRow,lnTop,lnBottom,lnMouseRowPos,lnMouseColPos With This If Mdown() lnBottom = .Top+.HeaderHeight+.RelativeRow * .RowHeight lnTop = m.lnBottom - This.RowHeight lnMouseRowPos = Mrow(Wontop(),3) lnMouseColPos = Mcol(Wontop(),3) llChangingRow = !(Between(m.lnMouseRowPos,m.lnTop, m.lnBottom) ; and Between(m.lnMouseColPos,.Left,.Left+.Width)) Else llChangingRow = Inlist(Lastkey(),24,5,18,3,141,145,148) Endif EndwithCetin