Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/28.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 从下一个空行开始将列数据复制/粘贴到现有工作表(问题)_Excel_Vba_Offset_Paste - Fatal编程技术网

Excel 从下一个空行开始将列数据复制/粘贴到现有工作表(问题)

Excel 从下一个空行开始将列数据复制/粘贴到现有工作表(问题),excel,vba,offset,paste,Excel,Vba,Offset,Paste,我有一个电子表格,其中有不同的列,每列由单个宏单独复制并粘贴到下一个空行开始的不同工作表中。这是完美的,正如预期的那样,但存在一个前所未有的问题: 列C是一个帐户名。D列是事务描述 列C从不包含空格。但是,列D有时在列的最后一个单元格上没有事务描述。下次应用宏时,它会将开始数据粘贴到D列中的下一个空单元格中,使其无法正确对齐,然后该列上向南的范围将偏移1个或多个单元格 我的问题是: 在D列的下一个空单元格上开始粘贴作业,但如果C列旁边有数据,则不开始粘贴作业 编辑: 以下是我当前使用的代码: `

我有一个电子表格,其中有不同的列,每列由单个宏单独复制并粘贴到下一个空行开始的不同工作表中。这是完美的,正如预期的那样,但存在一个前所未有的问题:

列C是一个帐户名。D列是事务描述

列C从不包含空格。但是,列D有时在列的最后一个单元格上没有事务描述。下次应用宏时,它会将开始数据粘贴到D列中的下一个空单元格中,使其无法正确对齐,然后该列上向南的范围将偏移1个或多个单元格

我的问题是:

在D列的下一个空单元格上开始粘贴作业,但如果C列旁边有数据,则不开始粘贴作业

编辑:

以下是我当前使用的代码:

`Sub SAMPLE_COPYOVER_BOA_G()
    Sheets("BANK OF AMERICA").Select
    Rows("6:6").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$6:$T$1000").AutoFilter Field:=2, Criteria1:="<>"
    Range("G7:G1000").Select
    Selection.Copy
    Sheets("COMBINED").Select
    Sheets("COMBINED").Cells(Rows.Count, "C").End(xlUp).Offset(1). _
    PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
    SkipBlanks:=False, Transpose:=False
   Sheets("COMBINED").Select

End Sub`
`Sub-SAMPLE\u COPYOVER\u BOA\u G()
表格(“美国银行”)。选择
行(“6:6”)。选择
自动筛选
ActiveSheet.Range(“$A$6:$T$1000”)。自动筛选字段:=2,标准1:=“”
范围(“G7:G1000”)。选择
选择,复制
表格(“组合”)。选择
表(“组合”)。单元格(行数,“C”)。结束(xlUp)。偏移量(1)_
粘贴特殊粘贴:=xlPasteValues,操作:=xlNone_
SkipBlanks:=False,转置:=False
表格(“组合”)。选择
端接头`

这段代码工作正常,但问题是,当我转到D列的宏时,它将从下一个空行开始粘贴,而不管C列是长是短。

如果需要帮助修复代码,最好将其包含在问题中。如果ColC从来没有空的空格,那么应该使用它来确定下一个粘贴行。