質問: True MsgBox MyStr
回答: こんにちは。 あまり、他人のコードを細かく調べるつもりはありませんが、 >・シート名を特定の名前にしたい それは、単に、 With Sheets.Add としているだけですから、 その後に、 ActiveSheet.Name = "○○○" >・同ファイル内の、既存の「TTL」というシート上で合計を表示させたい そのコードですと、最終行が出るはすですから、 TTL のシートに、 n の変数を再利用して、 Worksheets("TTL").Range("A1").FormulaLocal = "=SUM(○○○!B1:B" & n & ")" とすればよいはずです。