Excel从单元格获取/提取上限字母到另一个单元格

Question

如何从单元格提取封顶字母到另一个单元格

John Doe = JD

SomeWord = SW

ExTraCt = ETC

是否有关于此的功能。我需要从列A到列B提取上限值。单元格只包含文本值+空格（没有数字，没有特殊字符）

Answer 1

我找到了解决方案但是用VB。在普通模块中插入代码：

Function ExtractCap(Rng As Range)
Application.Volatile
ExtractCap = ""
For f = 1 To Len(Rng)
If Asc(Mid(Rng.Value, f, 1)) >= 65 And Asc(Mid(Rng.Value, f, 1)) <= 90 Then
ExtractCap = ExtractCap & Mid(Rng.Value, f, 1)
End If
Next f
End Function

然后使用如下公式：

= ExtractCap（A1）

仅显示A1中的大写字母。

参考：http://www.mrexcel.com/forum/excel-questions/230646-extract-capital-letters-text-cell.html#post1127820