1金币
最佳答案Dim selectionArr As FarPoint.Win.Spread.Model.CellRange() = fs.Sheets(sheet).GetSelections()
If fs.Sheets(sheet).RowCount = 0 OrElse selectionArr.Length = 0 Then
Return -1
End If
'满足条件说明从下往上选择
If fs.Sheets(sheet).ActiveRowIndex > selectionArr(0).Row Then
Return fs.Sheets(sheet).ActiveRowIndex - selectionArr(0).RowCount + 1
...
| |
| |
| |
| |
| |
| |