INDEX等函数问题，请求协助

ccy311

INDEX(订单汇总表客户名称,SMALL(IF(订单汇总表!$H:$H=B$2),ROW(订单汇总表!$H3:$H199),200),ROW(订单汇总表!G2)))&""
这个函数怎么实现不了

红色工作表中黄色内容都是需要大师们帮个忙，谢谢了！！ 订单录入函数.rar (93.94 KB, 下载次数: 2)

2020-7-19 01:24 上传

点击文件名下载附件

ccy311

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Pw as string
If Target <> "" Then
    Target.Locked = True
    Me.Protect ("123")
    On Error Resume Next
    Pw = InputBox("修改内容请输入密码：")
    if Pw="123" then
        Me.Unprotect (Pw)
    Else
        msgbox "密码错误"
    end if
End If
End Sub
这个代码填入表格怎么提示错误，该怎么改呢