使用vba格式化Excel数据库头

使用vba格式化Excel数据库头,vba,excel,Vba,Excel,我有一个excel表格,我想提取一部分列名:例如,列名是“Y2014”,我应该只获取字符串(或整数)“2014” 这是我的密码 Function findValue(year As String) Dim formattedYear As String formattedYear = Microsoft.VisualBasic.Right(year, 1) findValue = formattedYear End Function 如果我尝试使用一个简单的值进行findValue(“Y201

我有一个excel表格,我想提取一部分列名:例如,列名是“Y2014”,我应该只获取字符串(或整数)“2014” 这是我的密码

Function findValue(year As String)
Dim formattedYear As String
formattedYear = Microsoft.VisualBasic.Right(year, 1)
findValue = formattedYear
End Function
如果我尝试使用一个简单的值进行findValue(“Y2014”),或者尝试使用单元格值findValue(Q1)(其中A1内容相当于“Tableau1[[En-têtes];[Y2014]”),我会得到一个值错误:
有人能帮忙吗?谢谢。

查看代码的第一印象是函数总是返回一个值,因此您必须指定函数返回的类型

函数findValue(年份作为字符串)作为字符串


您遇到了什么样的错误?

我刚刚不得不摆脱
Microsoft.VisualBasic。
提到错误,因为您应该使用
Right(年份,1)
而不是
Microsoft.VisualBasic.Right(年份,1)
。但是,它只提供一个正确的字符。即使指定了返回类型,我仍然会在单元格中得到错误“#Value!”,我应该得到答案