时间戳

首页 > 解决方案 > 将数据从工作表复制到具有动态范围的新工作簿

excel - 将数据从工作表复制到具有动态范围的新工作簿

问题描述

我正在尝试将数据从一张表复制到具有动态范围的新工作簿，该动态范围使用 vba 找到最后一个空行。我设法完成了这项工作，但我无法让它不检查单元格中的公式。因此，如果单元格为空或使用公式，我需要找到一种方法使其停止复制。

Sub CopyUserDataPROD()
  Dim CopyLastRow As Long
  
  Set NewBook = Workbooks.Add
  Set wsCopy = ThisWorkbook.Worksheets("UL users PROD")
  
  CopyLastRow = wsCopy.Cells(wsCopy.Rows.Count, "B").End(xlUp).Row
  wsCopy.Range("A1:AJ" & CopyLastRow).Copy
  NewBook.Worksheets("Sheet1").Range("A1").PasteSpecial (xlPasteValues)
End Sub

标签： excelvba

解决方案

推荐阅读