_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()
を配置する必要があります。