我在Excel 2016中创建工作订单数据库。在单独的工作簿中，我使用命令按钮创建了一个请求表单。单击该按钮时，表单auto中的信息将填充到工作订单数据库工作簿中。最初我想让它填充下一个空行。但是，我希望第10列是顺序生成的数字（工单号），第11列是基于第1列和第2列的优先级排序。以下是命令按钮中的代码。
Private Sub CommandButton1_Click()
Dim TaskType As String
Dim TimeSensitive As String
Dim TimeSensitiveDate As Date
Dim TodaysDate As Date
Dim Address As String
Dim Department As String
Dim ContactName As String
Dim ContactEmail As String
Dim Description As String
Dim myData As Workbook
Worksheets("sheet1").Select
TaskType = Range("B4")
Worksheets("sheet1").Select
TimeSensitive = Range("B6")
Worksheets("sheet1").Select
TimeSensitiveDate = Range("B8")
Worksheets("sheet1").Select
TodaysDate = Range("B10")
Worksheets("sheet1").Select
Address = Range("B12")
Worksheets("sheet1").Select
Location = Range("B14")
Worksheets("sheet1").Select
Department = Range("B16")
Worksheets("sheet1").Select
ContactName = Range("B18")
Worksheets("sheet1").Select
ContactEmail = Range("B20")
Worksheets("sheet1").Select
Description = Range("B22")
Set myData = Workbooks.Open("C:\Users\Calvin\Desktop\WFACS - Work Order
System\Work Order Management System.xlsm")
Worksheets("Sheet1").Select
Worksheets("Sheet1").Range("a1").Select
RowCount = Worksheets("Sheet1").Range("A3").CurrentRegion.Rows.Count
With Worksheets("Sheet1").Range("A2")
.Offset(RowCount, 0) = TaskType
.Offset(RowCount, 1) = TimeSensitive
.Offset(RowCount, 2) = TimeSensitiveDate
.Offset(RowCount, 3) = TodaysDate
.Offset(RowCount, 4) = Address
.Offset(RowCount, 5) = Location
.Offset(RowCount, 6) = Department
.Offset(RowCount, 7) = ContactName
.Offset(RowCount, 8) = ContactEmail
.Offset(RowCount, 9) = Description
End With
myData.Save
End Sub
所以我想我现在想要创建一个新行，用0-9（AJ）中其他工作簿中的数据填充，然后在第10行中分配一个序列号，在第11行中根据此代码分配优先级存在于数据库工作簿中。
= IFERROR（INDEX（Sheet 2中$ L $ 2：$ M $ 14 MATCH（A3，Sheet2的$ķ$ 2：$ķ$ 14,0），MATCH（B3，Sheet2的$ L $ 1：！$ M $ 1,0 ）），＆＃34;＆＃34）
这应该适用于所有A列和B列，而不仅仅是A3和B3（此代码适用于单元格L3）
非常感谢任何帮助。
提前致谢！