如何在EXCEL中实现数据递升

发布网友发布时间：2022-04-27 03:03

共2个回答

热心网友时间：2022-06-25 05:08

亲，请下载附件。

把输入的行改到了第50行，因为49行原来就有数据，你直接更改它、还要把它保存到上一行，逻辑上有点问题。

打开你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧空白处点击右键，“插入”，“模块”。右侧空白处粘贴下面的代码。关闭VBA窗口。

点击菜单“开发工具”，“插入”，选择第一个“按钮”。在表格的空白区域用鼠标拖拽出一个矩形按钮，并指定宏。如果菜单上没有“开发工具”，请点击菜单“文件”，“选项”，“自定义功能区”，右侧的窗口中勾选“开发工具”。

Sub TJ()
Range("A1:F48").Value = Range("A2:F49").Value
Range("A49:F49").Value = Range("A50:F50").Value
Range("A50:F50").Value = Array("", "", "", "", "", "")
End Sub

热心网友时间：2022-06-25 05:09

输入是在另一个页面或者就在第一行？
可能要使用空间来实现