If (Tables("表A").BottomPosition - Tables("表A").TopPosition) > 9 Then MessageBox.Show("选了" & Tables("表C").BottomPosition - Tables("表C").TopPosition + 1 & "行")
End If