首页 > 其它 > 正文
已解决

VBA同时查找两个工作表的B列并定位到找到的地址

来自网友提问 

1个回答                                     问天道网53678位专家为你答疑解惑

最佳答案
  热心网友突突兔2019回答  来自团队: 智库  
 
             2022-6-21 · TA获得超过383个赞

点击按钮1:

Sub 按钮1_Click()

 Dim xlb%, ftb%

 xlb = ***.iferror(***.match(Range(“C3”), Range(“线路板2022收款明细!B:B”), 0), 0)

 ftb = ***.iferror(***.match(Range(“C3”), Range(“覆铜板2022收款明细!B:B”), 0), 0)

 

If xlb = 0 And ftb = 0 Then MsgBox “俩工作表B列都没有——” & Range(“C3”)

 If xlb = 0 And ftb > 0 Then _

    MsgBox ““线路板2022收款明细”工作表B列都没有——” & Range(“C3”) & _

    Chr(10) & Chr(13) & _

    ““覆铜板2022收款明细”工作表B列有——” & Range(“C3”) & “,在第” & ftb & “行”

 

If xlb > 0 And ftb = 0 Then _

    MsgBox ““线路板2022收款明细”工作表B列有——” & Range(“C3”) & “,在第” & xlb & “行” & _

       Chr(10) & Chr(13) & _

       ““覆铜板2022收款明细”工作表B列没有——” & Range(“C3”) Else _

    MsgBox ““线路板2022收款明细”工作表B列有——” & Range(“C3”) & “,在第” & xlb & “行” & _

       Chr(10) & Chr(13) & _

       ““覆铜板2022收款明细”工作表B列有——” & Range(“C3”) & “,在第” & ftb & “行” 

End Sub


 
 
  热心网友老牛_890回答  来自团队: 千狐兮兮  
 
             2022-6-9 · TA获得超过2392个赞

可能是机座松动,连接螺钉不够紧


 

猜你喜欢
发表评论

电子邮件地址不会被公开。 必填项已用*标注

评论信息