根据 Combobox 获取文本框中的条件值

Question

在这里，我在工作表（“Sale”）lastrow 的文本框（txt_Rec）中有序列号。

现在我想在文本框（txt_Rec）中获取条件值，如果我从组合框（Me.cmb_Type）下拉列表中获取 select“Sale”，那么我想要在文本框（txt_Rec）中输入工作表（“Sale”）最后一个序列号，如果我 Z99938282F04071859941E18F16EF42Z“E18F16EF42Z”从组合框（cmb_Type）下拉列表中购买”然后我想要文本框（txt_Rec）中的工作表（“购买”）lastrow序列号。

 Private Sub UserForm_Initialize()
 Application.ScreenUpdating = False
 Dim sh As Worksheet
 Set sh = ThisWorkbook.Sheets("Sale")
 Dim wb As Worksheet
 Set wb = ThisWorkbook.Sheets("Purchase")
 Dim lastrow As Long
     lastrow = sh.Range("A" & sh.Rows.Count).End(xlUp).Row
 Dim lr As Long
     lr = wb.Range("A" & wb.Rows.Count).End(xlUp).Row
 if
     Me.cmb_Type = "Sale" then
     Me.txt_Rec.Value = lastrow
 else
 if
     Me.cmb_Type = "Purchase" then
     Me.txt_Rec.Value = lr
 end if
 end if
 ``` dropdown for Item type ```

 With Me.cmb_Type
    .Clear
    .AddItem ""
    .AddItem "Sale"
    .AddItem "Purchase"
    End With
    End Sub