EXCEL中的操作。如何快速完成，相同订单复制。有几百行。

2025-04-04 22:37:41

推荐回答（1个）

回答1：

Sub t()
For a = 2 To Sheet1.UsedRange.Rows.Count
If Range("E" & a) = Range("E" & a - 1) Then
Range("A" & a & ":D" & a).Value = Range("A" & a - 1 & ":D" & a - 1).Value
End If
Next
End Sub
Sheet1中，如果E列的值和上一个相同，就复制上一行值的值到这一样。

最新问答

我们要从苏州自驾到厦门旅游，帮忙规划一下路线和沿途城市的景点。

有什么听歌软件免费的？就是下载不要会员的

高数第81题，不定积分求面积。利用牛顿莱布尼兹公式，我的结果和答案不一样？