5流クン
2019/04/19 (金) 17:40:49
73ee0@9ec8c
報告します。
Set ws = Workbooks("auctions_ado.xlsm").Worksheets("sheet1")
を
Set ws = ThisWorkbook.Worksheets("sheet1")
に変更したところ、エラーが出なくなりました。
通報 ...