0187デフォルトの名無しさん (ワッチョイ bf6d-J8Ag)垢版 | 大砲2017/07/09(日) 22:23:32.11ID:XJb9KLmK0 >>186 それはrange指定してないっす・・・ Private Sub Workbook_NewSheet(ByVal Sh As Object) Sh.Cells(1, 1).Value = "aaa" End Sub で通ったよ