如何选择所有非空白单元格并粘贴到表中而不覆盖现有值

时间:2018-05-17 19:08:04

标签: excel-vba vba excel

以下代码仅引用第3行,我需要捕获A列中的所有非空白单元格,并将值放在另一个工作表的表中,而不覆盖现有值。我试图操纵代码没有运气。

由于

if(wconfig.reloadOnClassChange) 
{
    if(managedClassReload) 
    {
        if(wconfig.inplace) // <-- your problem, you are running inplace
        {
            log.info 'file {} is in managed output of {}, servlet-container will not be restarted', f, wconfig.projectPath
        }
        else 
        {
            log.info 'file {} is in output of {}, but it runs as WAR, servlet-container will be restarted', f, wconfig.projectPath
            webAppConfigsToRestart.add(wconfig)
        }
    } 
    else 
    {
       log.info 'file {} is in output of {}, servlet-container will be restarted', f, wconfig.projectPath
       webAppConfigsToRestart.add(wconfig)
    }
}

1 个答案:

答案 0 :(得分:1)

如果NewOrder中的值不是公式,那么这个单行就足够了。

With Sheets("NewOrder")
    .Range("A3", .Range("A" & Rows.Count).End(xlUp)).SpecialCells(xlCellTypeConstants).Copy _
                                        Sheets("TableData").Cells(lastrow, 1)
end with