前回アップした内容と処理を 組み合わせて処理をしました! '別ブックを開いて処理して保存 Sub B2() 'ブックを開くWorkbooks.Open Filename:="C:\???\???\???\マクロ\い.xlsx"'シートの選択Sheets("1").Select'セルを選択して値を入れる(処理)Range("A1").Value = "aa"'保存するActiveWorkbook.Save'閉じるActiveWorkbook.Close End Sub 新しいブックを開いて 新しいブックのシート1を選ぶ そして、「A1」に「aa」という文字を入れて そのブックを保存して そして閉…