VBA中有奇怪的"Argument not optional"错误

Question

Private Sub importClipboard_Click()
    Dim data As Collection
    data = getClipboardData()
    ...do something...
End Sub

Function getClipboardData() As Collection
    ...do something...    
End Function

我在行上得到一个"Argument not optional"编译错误:

data = getClipboardData()

我究竟做错了什么？getClipboardData()函数没有参数 - 所以我怎么能错过一个呢？

Answer 1

这是一个错误的错误消息,但你的问题是一个常见的问题 - Set data = getClipboardData()当你返回一个对象时,你必须放置它.