录制宏无法删除区域（这是哪里错误了）

/**

* Macro1 Macro

* 宏由 HYKJ-PC 录制，时间: 2025/12/05

*/

function Macro1()

{

Range("D6").Select();

ActiveWindow.ScrollRow = 14;

Range("D6:M25").Select();

ActiveWindow.ScrollRow = 1;

Range("D6:M25,O6").Select();

Range("O6").Activate();

ActiveWindow.ScrollRow = 15;

Range("D6:M25,O6:Q25").Select();

Range("O6").Activate();

ActiveWindow.ScrollRow = 1;

Range("D6:M25,O6:Q25,S6").Select();

Range("S6").Activate();

ActiveWindow.ScrollColumn = 6;

ActiveWindow.ScrollRow = 13;

Range("D6:M25,O6:Q25,S6:W25").Select();

Range("S6").Activate();

ActiveWindow.ScrollRow = 1;

ActiveWindow.ScrollColumn = 1;

Range("D6").Select();

}