[英]Excel VBA remove blank row after cut
我有这段代码，可以将整行剪切并粘贴到另一张纸上，我该如何删除现在出现在剪切原始行的第一张纸上的空白行。
Set ASR = ActiveWorkbook.Sheets("Main")
Set LS = ActiveWorkbook.Sheets("Exclusions")
ASR.cells(i, "C").EntireRow.Cut Destination:=LS.Range("A" & LS.Rows.Count).End(xlUp).Offset(1)
我希望从此答案中获得的这一行代码可以删除空白行，但无法正常工作
ASR.cells.Delete Shift:=xlUp
ASR.cells(i, "C").EntireRow.delete
Excel VBA 在活动工作表上剪切和粘贴活动行，将活动行粘贴到另一个工作表上的第一个空白行
[英]Excel VBA Cut & paste active row on an active sheet,active row to first blank row on another worksheet
删除特定行中的空白单元格，直到非空白单元格（VBA / Excel）
[英]Remove blank cells in specific row until nonblank cell (VBA/Excel)
声明:本站的技术帖子网页，遵循CC BY-SA 4.0协议，如果您需要转载，请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.