用js宏将excel数据分割

可以使用以下步骤来使用 JavaScript 宏将 Excel 数据分割：

1. 打开 Excel 文件并选择要分割的数据。
2. 点击“开发工具”选项卡，然后点击“Visual Basic”按钮。
3. 在“Microsoft Visual Basic for Applications”窗口中，点击“插入”菜单，然后选择“模块”。
4. 在新的模块窗口中，输入以下代码：

Sub SplitData()
Dim rng As Range
Dim row As Range
Dim rowCount As Integer
Dim lastRow As Integer
Dim targetRow As Integer

Set rng = Selection
lastRow = rng.Rows.Count

rowCount = Application.InputBox("Enter the number of rows per split file:", "Split Data", 10, Type:=1)

If rowCount >= lastRow Then
    MsgBox "The number of rows per split file must be less than the total number of rows in the selection.", vbCritical
    Exit Sub
End If

For Each row In rng.Rows
    If targetRow Mod rowCount = 0 Then
        Sheets.Add
        targetRow = 1
    End If
    row.Copy Destination:=ActiveSheet.Range("A" & targetRow)
    targetRow = targetRow + 1
Next row

End Sub

5. 点击“文件”菜单，然后选择“保存”。
6. 关闭 Visual Basic 编辑器窗口。
7. 回到 Excel 表格中，选择要分割的数据。
8. 点击“开发工具”选项卡，然后点击“宏”按钮。
9. 选择“SplitData”宏，然后点击“运行”。

这将弹出一个对话框，要求您输入每个分割文件中的行数。输入所需的行数后，单击“确定”按钮。代码将分割选定的数据，并将其保存到新的 Excel 文件中，每个文件包含指定的行数。