我只是VBA编码的新手,所以我不太清楚我在做什么,不幸的是。我希望我能在这里得到一个手。
我想做的是。
第一步:复制一行(包含公式)并将其粘贴到相同位置但仅作为值粘贴。
第二步:将选定的单元格向下移动一行
第三步:复制一行(带公式)并将其与公式一起放在另一行。
这一切都在同一张纸上完成。
如果我能得到一些帮助,或者某些方向可以获得一些非常感谢的教程。
答案 0 :(得分:2)
通常情况下,如果没有你的努力,我不会这样做,但为什么不呢?以下是我能得到的简单。不过请使用宏录制器来查看这一切是如何工作的。这就是我们很多人开始的方式。
Sub StepOne()
Dim myRow As Long
myRow = 1 ' We will "copy/paste" on Row 1
' To avoid using the clipboard, you can simply set two ranges' values equal. This will
' clear out any formulas and leave the values.
Rows(myRow).Value = Rows(myRow).Value
End Sub
第二个:
Sub StepTwo()
Dim rng As Range
'Change this as required. Note the use of `Set` with a `Range` type.
Set rng = Range("A1:A10")
rng.Cut rng.Offset(1, 0)
End Sub
最后一个:
Sub StepThree()
' Not tellin :P! You should be able to get this. Hint: look at StepOne.
End Sub
编辑:啊,我现在意识到第三步比设置两个范围更加复杂,因为你想保持公式。但是,我会把这作为一个学习机会供你调查。如果你无法弄清楚,请告诉我,我可以指导你。 :d