Question

我正在根据主工作表上一列中的值将信息从一个工作表移动到另一个工作表。现在，代码根据源列中的一个值拉取行，但我需要修改它以拉出与两个值匹配的行。我现在用的是

  'If value in column Y ends with "6100", copy to report sheet
        If c.Value Like "*6100" Then

基本上不是6100我需要拉* 6100和* 6200。我不知道为什么我不能让它工作。有什么简单的修改方法吗？

Answer 1

像这样。

虽然如果你的代码需要一段时间，如果最后4位数与这两个criteira匹配，则运行AutoFilter标记为True可能会更有效率

 If c.Value Like "*6100" Or c.Value Like "*6200" Then
 'do stuff
 Else
 'do other stuff
 End If

Answer 2

这可能会帮助你，它将多个条件语句嵌入到单元格中，评估一个单元格的内容以产生所需的结果。

= IF（Q1087 <= 0.04167，“＆lt; 1Hr”，IF（AND（Q1087 <= 0.2083，Q1087> 0.0416），“1至5小时”，IF（AND（Q1087 <= 0.4167，Q1087＆gt; 0.208），“5至10小时”，IF（AND（Q1087 <= 1，Q1087> 0.4167），“10至24小时”，IF（AND（Q1087 <= 2，Q1087> 1），“1至2天” “，IF（AND（Q1087＆lt; = 5，Q1087＆gt; 2），”2至5天“，IF（Q1087> 5，”＆gt; 5天“，”“））））））））

需要根据一列中的多个值将行从一个ws复制到另一个ws

2 个答案: