A1形式で数式入力  Sub test() ' A1形式で数式入力    Range("E3").Formula = "=B3+C3+D3"    Range("F3···