Excel 提取工作簿的第一个字符，并使用vba复制到另一个工作簿

我一直在寻找一种方法来解决我的问题，通过使用MID，Split，我仍然无法得到结果

我试图从一个excel工作表中提取第一个字符，并使用VBA复制到另一个excel工作簿

strChar = Range("G2")
Workbooks("InputA.xls").Worksheets("Sheet0").Mid(strChar, 1, 1).Copy _
        ("Output.xls").Worksheets("Sheet1").Range ("F2")

我不熟悉VBA，但我已经查找了MID、LEFT、RIGHT和Spilt，但似乎我无法写出正确的代码

---

例如，在范围（“G2”）中，其值为（B）EEO324，但我只需要提取字符B并复制到另一个工作簿

，就像快速澄清一样，所有前几个字符都会像示例中所述的那样放在括号中吗？所以（B）或（F）或（2）？还会从其他工作簿中提取字符吗？如果是这样，你需要先打开并激活它。不仅第一行像（B），我只需要将B提取出来。第二行向前将类似于231243245，但我只需要提取A。是的，它将被提取到另一个工作簿，我也激活了另一个工作簿，但仍然无法获得结果。因此，重要的是要知道数据是否遵循模式，以便您可以基于该模式编写代码。例如，如果它总是在（）中，您可以使用

mid（var，2,1）

。既然不是这样，它总是像A或B一样按字母顺序排列的大写字母吗？如果不知道这将是很难作出的东西，为一切工作。因此，如果一个单元格有

（7）

，而下一个单元格有

B

，则无法按类型或位置提取字符。总字符数是否总是相同的？可能只有第一行会不同，但其余的都是相同的。在这种情况下，按照@Tim Williams提供给您的代码进行操作。您好，我已经尝试了您的代码，它可以工作，但这只提供了单元格的第一个字符。如果我需要提取单元格的第二个字符，我应该更改什么？非常感谢

Mid（[cell ref here]，2,1）

非常感谢现在我知道问题出在哪里了。我没有使用value

        Workbooks("Output.xls").Worksheets("Sheet1").Range ("F2").Value = _
           Left(Workbooks("InputA.xls").Worksheets("Sheet0").Range("G2").value, 1)