Excel VBA将单元格中的数据拆分并将其复制到另一个工作表中

Question

我对VBA很陌生，而且我遇到了一个可能有简单解决方案的问题。

在单元格A1中，我有一个字符串“UP 5487441 - 一些更多的文字”。我只需要将“OUP5487441”（是的没有空格和文本）到另一张工作表中放入单元格C3中。

我已经挖了很多找到这个解决方案，但我只是继续找到功能，但我需要它是一个更大的VBA宏的一部分，将用于几个文件。但数据总是在单元格A1中。

如果有人有任何提示，我非常感谢！

电贺

Sanved

Answer 1

这应该工作：

Dim splitValues() as String 

splitValues = Split(ActiveSheet.Cells(1,1).Value) 

Sheet2.Cells(3,3).Value = splitValues(0) & splitValues(1) 

很明显，你可以让这个相当多，当你将它添加到现有的代码，但是这是一般的策略，以稳健使用。