Dim dobj As MSForms.DataObject Set dobj = New MSForms.DataObject dobj.SetText CStr(newNo) dobj.PutInClipboard MsgBox "クリップボードにコピーしました。", _ vbInformation, "コピー完了" ChatGPTが上記のコードを書いてくれたんですが、エラーが出る。
現在アクセス不可の可能性がある結果が表示されています。
アクセス不可の結果を非表示にする現在アクセス不可の可能性がある結果が表示されています。
アクセス不可の結果を非表示にする