Excel 如何用正确的数据填充空白单元格,而不覆盖其上方的数据

Excel 如何用正确的数据填充空白单元格,而不覆盖其上方的数据,excel,vba,Excel,Vba,好吧,我一直在努力让它工作,我已经想出了这个,但显然不起作用 With Application .ScreenUpdating = False .DisplayAlerts = False .EnableEvents = False .Calculation = xlCalculationManual End With With wsJL Dim wsJL As Worksheet Set wsJ

好吧,我一直在努力让它工作,我已经想出了这个,但显然不起作用

    With Application
        .ScreenUpdating = False
        .DisplayAlerts = False
        .EnableEvents = False
        .Calculation = xlCalculationManual
    End With


With wsJL
    Dim wsJL As Worksheet
    Set wsJL = Sheets("Jobs List")

        lastrow = wsJL.Cells(Rows.Count, "J").End(xlUp).Row
        fstcell = wsJL.Cells(Rows.Count, "I").End(xlUp).Row
        wsJL.Range("AA1:AD1").Copy wsJL.Range("J & fstcell:N" & lastrow)
End With
这部分不起作用

wsJL.Range("AA1:AD1").Copy wsJL.Range("J & fstcell:N" & lastrow)
我想知道如何使它工作…我从来没有见过这样使用的公式,虽然我的谷歌搜索,所以我甚至不知道这是可能的或不可能的


谢谢你的帮助。

你没有让我一路走下去,但我想你是在追求这样的目标:

wsJL.Range("AA1:AD1").Copy wsJL.Range("J" & fstcell & ":N" & lastrow)

请注意,
&
运算符可能无法在字符串中工作。

好的,我甚至没有注意到我的输入错误。。。谢谢你这么说,但那仍然是不可能的。基本上,我要做的是将单元格AA1:AD1中的内容复制到J中的第一个打开的单元格,一直复制到N,然后结束,这样它就不会通过I中的最后一个单元格。所以它看起来像是在粘贴这样的内容:
wsJL.Range(“AA1:AD1”)。复制wsJL.Range(“J22:N50”)
我希望这现在是有意义的。我看不出这有什么意义。听起来你想要下一行的
J22=AA1
K22=AB1
L22=AC1
M22=AD1
,但是
N22
呢?你是说
J23=AA1
,等等?对不起,我这边的单元格输入错误是
AA1:AE1
。好的,这就是我要做的。在单元格A到I中,是每天导入的数据。J到N是包含公式的单元格,或者是手动调整的单元格。单元格
AA1:AE1
是进入
J:N
的内容。在单元格
AA1中,AC1
是公式,在
AB1
中是条件格式,不能覆盖ode>J,单元格中的内容先于上面的内容,也不能用
AE1
替换N中的内容,因为人们在
N
中的单元格中留下注释。所以我需要一个公式,可以粘贴
AA1:AE1
中的内容,但不能超过
I
。这有什么意义吗?这是我正在处理的表格,我是这是第一本工作簿。别介意这个错误,它是一个错误,由于明显的原因没有显示在原始文档中。您缺少了一些引号。
“J&fstcell:N”和lastrow
应该是
“J”&fstcell&“:N”&lastrow
。不过,我相信
“J&fstcell
就足够了。只需要指定目标的第一个单元格。