Strange „Argument nicht optional“ Fehler in VBA

Question

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

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

Ich erhalte ein „Argument nicht optional“ kompilieren Fehler in der Zeile:

data = getClipboardData()

Was mache ich falsch? Es gibt keine Argumente an die GetClipboardData () Funktion - so wie kann ich ein fehlt

Answer 1

Es ist eine schlechte Fehlermeldung, aber Ihr Problem ist ein allgemeiner - Sie haben Set data = getClipboardData() zu setzen, wie Sie ein Objekt sind Rückkehr

.