1、打开一个excel文件,新建一个文档。
2、进入visual basic,新建一个模块备用
3、在模块中输入下面的代码:Sub clear() If MsgBox("是豸阏恢闲否要清空数据?", 1 + vbokNo) = vbOK Then Range(&鳎溻趄酃quot;A1:Z100").Clear End IfEnd Sub
4、执行后,A1-Z100的区域的数据就被清除了。
时间:2024-10-14 12:36:45
1、打开一个excel文件,新建一个文档。
2、进入visual basic,新建一个模块备用
3、在模块中输入下面的代码:Sub clear() If MsgBox("是豸阏恢闲否要清空数据?", 1 + vbokNo) = vbOK Then Range(&鳎溻趄酃quot;A1:Z100").Clear End IfEnd Sub
4、执行后,A1-Z100的区域的数据就被清除了。