अजीब "तर्क नहीं वैकल्पिक" VBA

Question

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() फ़ंक्शन के लिए कोई तर्क नहीं है - तो मैं एक को कैसे याद कर सकता हूं?

Answer 1

यह एक बुरा त्रुटि संदेश है, लेकिन आपकी समस्या एक आम है - आपको Set data = getClipboardData() डालना होगा क्योंकि आप किसी ऑब्जेक्ट को वापस कर रहे हैं।