用VBA脚本语言在Excel 2019中实现数据表中的内容上下循环滚动

可以使用VBA脚本语言中的Timer事件和Worksheet_SelectionChange事件来实现数据表中的内容上下循环滚动。具体实现步骤如下：

1. 在VBA编辑器中打开你的Excel文件，右键点击该文件的名称，选择“插入” -> “模块”，在新建的模块中编写下面的代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static bBusy As Boolean
    If bBusy Then Exit Sub
    bBusy = True
    Application.OnTime Now + TimeValue("00:00:05"), "ScrollDown"
    bBusy = False
End Sub

Sub ScrollDown()
    Dim ActiveCell As Range
    Set ActiveCell = ActiveCell.Offset(1, 0)
    If ActiveCell.Row > ActiveSheet.UsedRange.Rows.Count Then
        ActiveSheet.Cells(1, 1).Activate
    Else
        ActiveCell.Activate
    End If
End Sub

2. 将上面的代码复制到模块中后，切换到Excel文件中的数据表工作表。选中数据表中的任意一个单元格，然后按下“Alt + F8”打开宏对话框，选择“ScrollDown”宏并运行它。

3. 运行后，数据表中的内容会每隔5秒钟向下滚动一行，直到滚动到数据表的最后一行。当滚动到最后一行时，数据表会从最上面的第一行重新开始滚动。

注意：在运行宏之前，需要将Excel的安全性设置为“低”，否则会提示“宏已被禁用”。可以在Excel中选择“文件” -> “选项” -> “信任中心” -> “信任中心设置” -> “宏设置”中设置Excel的安全性。