如果VBA多重条件

时间:2015-04-22 19:30:56

标签: excel excel-vba if-statement multiple-conditions vba

我的VBA代码和说明IF有问题,我必须使用多条件,但是VBA,如果我将条件4检查为true则总是忽略其他条件。

  

((条件1)或(条件2))和(条件3或条件4)

需要宏只接受指定的选项:

  

((TRUE)或(FALSE))和(TRUE或FALSE)
  ((TRUE)或(FALSE))和(TRUE或TRUE)
  ((FALSE)或(TRUE))和(TRUE或FALSE)
  ((FALSE)或(TRUE))和(TRUE或TRUE)

有真正的代码:

If ((raport_glowny.Cells(i, R_delivedate_C).Value = CDate(Arkusz6.DeliveryDaySMS)) _
And (raport_glowny.Cells(i, R_deliverytime_C).Value >= CDate(Arkusz6.DeliveryHourSMS.Value))) _
Or ((raport_glowny.Cells(i, R_delivedate_C).Value = CDate(Arkusz6.DeliveryDaySMS) + 1) _
And (raport_glowny.Cells(i, R_deliverytime_C).Value < CDate(Arkusz6.DeliveryHourSMS.Value))) _
And ((raport_glowny.Cells(i, R_deliverytime_C).Value > 0) _
Or (Arkusz6.cbSMSforecast = True)) Then

如果有人可以提供帮助,我将非常感激

0 个答案:

没有答案