excel怎么快速定位到空白行并让其处在首行位置？ 比如1到10行都有数据的，我想直接移动到第1

打开你的工作簿，按ALT+F11,在左边找到工作簿下面对应的 thiswork ，双击它，将代码贴到弹出的窗口中。

当然，打开工作簿的时候要启用宏。

Private Sub Workbook_Open()
    Dim R As Range
    Set R = Cells.Find("*", [A1], , , xlByRows, xlPrevious, , , False)
    If R Is Nothing Then
        Application.Goto [A1], True
    Else
        Application.Goto Range("A" & R.Row + 1), True
    End If
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Dim R As Range
    Set R = Sh.Cells.Find("*", Sh.[A1], , , xlByRows, xlPrevious, , , False)
    If R Is Nothing Then
        Application.Goto Sh.[A1], True
    Else
        Application.Goto Sh.Range("A" & R.Row + 1), True
    End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 2 Then
        n = Range("A65536").End(xlUp).Row
        Range("A1").Select
        ActiveWindow.SmallScroll Down:=n
    End If
End Sub

按ALT+F11，打开VBE编辑器，双击VBE编辑器中要实现效果的Sheet的名称，把上面的代码复制进去，关闭VBE编辑器，回到工作表中，点一下B列的任意单元格，就可以看到效果了

Ctrl+ 下方向键
Ctrl+End

可以用vba编程实现

你这个要编个程序（宏）才能实现了。