Странная ошибка "Аргумент не факультативна" в VBA

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

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

Я получаю сообщение об ошибке "Аргумент не обязателен":

data = getClipboardData()

Что я делаю не так? У функции getClipboardData() нет аргументов - так как мне ее пропустить?

Ответ 1

Это плохое сообщение об ошибке, но ваша проблема является общей: вам нужно поставить Set data = getClipboardData() при возврате объекта.