求VBA IF语句优化，谢谢！

feixiangye

求VBA IF语句优化，求高手指点迷津，谢谢！


Sub test()
    If n = 1 Then
   
        '此处有很长一段代码
        
    ElseIf n = 2 Then
        If t > 3 Then
        
            '想要此处继续走n=1处一模一样的代码，怎样写可以不用把n=1处的代码再重复写到此处
            
        End If
    End If
End Sub

hongshan2019

单独写一个代码，引用

tanglf188

if n=1 or (n=2 and t>3) then
'此处有很长一段代码
end if

dragonthree

If n = 1 or   (n = 2 and t > 3) Then

DevilW

If n = 1 Then 改为 If n = 1 Or n = 2 And t > 3 Then

fzxba

feixiangye

dragonthree 发表于 2023-7-6 10:48
If n = 1 or   (n = 2 and t > 3) Then

明白了，非常感谢！

沈默00

和表格里写函数一样，用AND 或OR，把IF 条件合并了

feixiangye

tanglf188 发表于 2023-7-6 10:47
if n=1 or (n=2 and t>3) then
'此处有很长一段代码
end if

一时脑子没转过来弯，就是这个效果，谢谢！