奇妙な＆＃8220;引数はオプションではありません＆＃8221; VBAのエラー

StackOverflow https://stackoverflow.com/questions/1032819

  •  06-07-2019
  •  | 
  •  

質問 

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

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

＆quot;引数はオプションではありません＆quot;行のコンパイルエラー：

data = getClipboardData()

間違っているのは何ですか？ getClipboardData（）関数への引数はありません-どのようにして引数をなくすことができますか？

役に立ちましたか？

解決

それは悪いエラーメッセージですが、あなたの問題は一般的なものです-オブジェクトを返すときに Set data = getClipboardData（）を置かなければなりません。

ライセンス： CC-BY-SA と 帰属
所属していません StackOverflow
scroll top