小编chr*_*a G的帖子

我需要创建一个消息框,显示3个不同的Excel范围.

这是我的数据:

我需要一个看起来像这样的消息框:

单击OK后,它应显示B1:B6,如下所示:

然后再次单击"确定"时,它应显示范围C1:C6.

到目前为止这是我的代码:

Sub Message_Box()

Dim a As Range
Dim sTxt As String

For Each a In ThisWorkbook.Sheets("Sheet1").Range("a1:a6")
sTxt = sTxt & vbLf & a.Value
Next a

MsgBox sTxt

End Sub

我很难使用条件拆分。

我有两个条件：

Order | Output name | Condition

1 | Status column completed |(Status) == "Completed"

2 |Default | (Status) == "Completed" && (Status) == "Incomplete"

在我的第一个订单中，在 status 列中，所有已完成的状态都将出现在我的临时表中，而在我的第二个订单中，无论状态是已完成还是未完成，它都会进入另一个用作我的原始表的表。截至目前，使用该条件我的第二个订单不起作用。所有完成状态是唯一进入正确表的状态。请帮忙，谢谢。