VBA;填充数组的最后一行以匹配相邻列的长度


1

因此,对于VBA的早期尝试,我正在写一个宏:

  1. 我正在粘贴一组每月增加行数的数据;数据组织良好,没有空白值/列
  2. 我在A-L列中有公式,我的数据被放入L-向前的列中
  3. 我想更新A-L中的公式/列以填充以匹配M列中的最后一个值

苦苦挣扎,如果你能够提供一个非常值得赞赏的解释。我知道它涉及选择A中的最后一行:L - 我已经得到了但我无法弄清楚如何干净地填充以每次匹配不同长度的列M.

Sub Macro6()
'
' Macro6 Macro
'

'
    Range("M1").Select
    Range(Selection, Selection.End(xlDown)).Select
    ActiveCell.Offset(0, -1).Select
    Range(Selection, Selection.End(xlToLeft)).Select
    Range(Selection, Selection.End(xlUp)).Select
    Selection.FillDown
End Sub

在不提供代码的情况下,我们如何为您提供帮助?
Raystafarian

欢呼@Raystafarian补充道。
Uncle Boz

Answers:


0

当然你可以使用顶部片段( lrow )获取底行,然后在其他方法中使用它

Sub test()
Dim lrow As Integer
lrow = Cells(Rows.Count, "M").End(xlUp).row
 Range("A1:A" & lrow).FillDown
 Range("B1:B" & lrow).FillDown
End Sub

@UncleBoz如果这解决了您的问题,请继续并单击答案旁边的绿色复选标记以指示问题有答案。
Raystafarian
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.