Странный “Аргумент не дополнительная” ошибка в 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() функция - поэтому, как я могу пропускать тот?

17
задан MarredCheese 23 August 2019 в 21:49
поделиться

1 ответ

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

35
ответ дан 30 November 2019 в 12:01
поделиться
Другие вопросы по тегам:

Похожие вопросы: