VBA获取函数以返回字符串

时间:2013-01-20 18:14:11

标签: vba

我有一系列大学的价值观。例如,我有一个字符串“密歇根大学”和“UMich”

为什么下面的函数不会在单元格中返回一个字符串“密歇根大学”

Function CleanUniCode(entry) As Variant
If entry = "UMich" Then entry = "University of Michigan"

End Function

还试过这个,单元格返回0,不知道为什么。

Function CleanUniCode(entry) As Variant
If entry Like "[UMich]" Then
entry = "University of Michigan"
ElseIf entry Like "[UPenn]" Then
entry = "University of Pennsylvania"
Else:
End If

End Function

1 个答案:

答案 0 :(得分:5)

这是因为您已将返回值指定给entry,但您应将其指定给CleanUniCode

Function CleanUniCode(entry) As Variant
    If entry = "UMich" Then CleanUniCode = "University of Michigan"
End Function

始终将返回值分配给函数名称。