VBA: 如果单元格以值开始，则复制单元格

Question

所以我想做的是，我有一个文件，有几千种代码编码，有2种编码。A -55和A -U 举个例子，这些代码要么是A-5500000，要么是A-U000001。我想分离A-U的从A-55的列，基本上发送A-55行到另一个标签，然后删除他们从原来的标签，只留下A-U的.我发现一些代码，复制的单元格，如果我键入整个值，我希望转移的代码（基本上A-5500002×1000），但它不是真的可行。任何帮助将是非常感激的。

Answer 1

既然你已经有了可以实现大部分功能的代码，那么问题就在于确定值。所以，与其说，例如。

if Range("A1")= "A-5500000" then   'copy to another tab and so on

而是用Left函数进行部分匹配，所以：

if Left(Range("A1"),4) = "A-55" then   'copy to another tab and so on