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 auf der Leitung:

data = getClipboardData() 

Was mache ich falsch? Es gibt keine Argumente für die getClipboardData() - Funktion - wie kann ich also eine verpassen?

Answer 1

Es ist eine schlechte Fehlermeldung, aber Ihr Problem ist eine gewöhnliche - Sie müssen Set data = getClipboardData() setzen, während Sie ein Objekt zurückgeben.