富贵论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

手机号码,快捷登录

手机号码,快捷登录

广告
查看: 6|回复: 0

[教程] Excel怎样实现换行前一行变成后一行数字

[复制链接]

1万

主题

1万

帖子

4万

积分

缴100拍卖保证金

UID
12
金币
0
威望
0
贡献
18054
宣传
0
买家
0
卖家
0
注册时间
2017-11-19
最后登录
2024-6-5

富贵吧信誉勋章签到达人勋章

发表于 2024-4-19 21:19 | 显示全部楼层 |阅读模式

excel怎样实现换行。前一行变成后一行的数字?

看图吧。不是专业的说不清楚。就是比如说列到E,,行到50

每次给A1给输入数字。b1就变成A1的,,,c1就变成b1...e1就变成c1。。到e1结束。。。

反正只要给A1输入。。后面的就变成前面一行的数字..

问题补充:每次给A1给输入数字。B1就变成A1的,,,C1就变成B1...E1就变成C1。。。A2变成E1的数字。只要前面A1有输入。就往后推。只要5列。。能输入5列就行..行几多都行。

Excel怎样实现换行前一行变成后一行数字-1.jpg

写了一段代码,把这段代码复制到你要实现功能的表里:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim i As Integer

For i=3 To Range("a2").Value

If Range("a" & i).Value <> "" Then

Range("A" & i).Insert Shift:=xlToRight

End If

Next

End Sub

该代码从第三行开始实现该功能,你可以在A2单元格里面输入你要实现该功能的最后一行行数,如10,参见下图

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|手机版|小黑屋|富贵论坛 ( 琼ICP备2022019866号-1 )

GMT+8, 2024-6-23 23:25 , Processed in 0.121050 second(s), 41 queries .

Powered by fgba.net

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表