两个文本string在Excel中显示为不同，导致macros读取false

我在电子表格中有两个单元格，A3和A4。 其中每个都有“AHU-2”。 我将A3内容复制到A4，使它成为一样的东西。

我有一个macros读取这两个单元格，如果它们是相同的，则将不同的单元格复制到另一个表单。 此macros现在运行多次，以复制几个不同的“标记值类别：标记值”对。 如CFM：50和EAT：78F。

现在，macros读取A3和A4为不同的值，不selectEAT单元格，保持最后一个单元格（50）被复制，并且把EAT值应该放在新的表格中。

有人知道如何解决这个问题？

这是我现在的代码的一部分。

Sheets("08-Attribute").Select Range("I3").Select Selection.Copy Sheets("JCX").Select Range("T2").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("08-Attribute").Select Range("K3").Select Selection.Copy Sheets("JCX").Select Range("U2").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("08-Attribute").Select If ("A3" = "A4") Then Range("I4").Select Selection.Copy Sheets("JCX").Select Range("V2").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("08-Attribute").Select If ("A3" = "A4") Then Range("K4").Select Selection.Copy Sheets("JCX").Select Range("W2").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False 

Answer 1

你必须仔细阅读如何避免select 。 您的语法也closures（如果（“A3”=“A4”））。 您也可以直接传输值，这比复制和粘贴值更有效率。

 With Sheets("08-Attribute") Sheets("JCX").Range("T2").Value = .Range("I3").Value Sheets("JCX").Range("U2").Value = .Range("K3").Value If .Range("A3").Value = .Range("A4").Value Then Sheets("JCX").Range("V2").Value = .Range("I4").Value Sheets("JCX").Range("W2").Value = .Range("K4").Value End If End With