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列的值和上一个相同，就复制上一行值的值到这一样。

最新问答

金华市机动车驾驶人考试互联网预约平台

手机可以通话但是放视频没有声音微信语音也没有声音来电铃声没有声音是什么问题

Porsche Design眼镜档次高吗？算不算奢侈品？

刚买抵押车的时候正常，现这年审出收个盗抢记录审不了车，该怎么解决？

金龙鱼的食用油过期的油吃了对身体有什么害处