Tag: autofill

macros自动填充

我想在P中创build一个名为Age of Ticket的列。 它正在计算两个date,然后自动填充。 这个macros将被用于改变行数的报告。 当我使用它时,它基本上是在P2上进行计算,然后在P1上进行计算(标签是),并且不自动填充。 Dim LastRow As Long LastRow = Range("P65000").End(xlUp).Row Range("P1").Select ActiveCell.FormulaR1C1 = "Age of Ticket" Range("P2").Select ActiveCell.FormulaR1C1 = "=RC[-5]-RC[-8]" Range("P2").Select Selection.AutoFill Destination:=Range("P2:P" & LastRow) Range("P2:P3000").Select ActiveWindow.SmallScroll Down:=210 [结果]

Excel VBA“范围级自动填充方法失败”

以下VBA代码(Excel 2007)失败,出现错误1004“范围类的自动填充方法失败”。 谁能告诉我如何解决它? Dim src As Range, out As Range, wks As Worksheet Set wks = Me Set out = wks.Range("B:U") Set src = wks.Range("A6") src.AutoFill Destination:=out (注意:我已经使用了Google等等,但是它经常出现,但是我所看到的所有回复都与格式不正确的范围地址有关,AFAIK不是我的问题。 在某人的build议下,我尝试用以下代码replace自动填充行: src.Copy out 这有把我的Excel会话进入一个明显的无限循环消耗100%的CPU,然后永远悬挂的效果。 好的,显然源必须是自动填充的目标范围的一部分。 所以我现在的代码如下所示: Dim src As Range, out As Range, wks As Worksheet Set wks = Me Set out = wks.Range("B1") Set src = […]