Excel VBAは、カット後に空行を削除します

行全体をカットして別のシートに貼り付けるこのコードは、元の行がカットされた最初のシートに表示される空白行を削除する方法です。Excel VBAは、カット後に空行を削除します

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)

私は空白行を削除します。このanswerから得たコード行を期待していたが、それはうまくいきませんでした

ASR.cells.Delete Shift:=xlUp

出典

2016-07-18 phillipsK

常に動作しないものを指定してください。あなたが期待することはしませんか？エラーですか？エラーメッセージとは何ですか？エラーの原因は何ですか？ Excelが応答しなくなったり、クラッシュしたりしますか？ – arcadeprecinct

ASR.cells(i, "C").EntireRow.delete

出典

2016-07-18 15:48:36

私はこのコードをFortループ内に持っていますので、削除行はforループでループしている行数を歪めています。これを調整する方法は分かりますか？ – phillipsK

@phillipsKデータセットを逆向きにループしていることを確認してください。 –

@ScottCranerには、代わりに 'Shift：= xlUp'を追加する方法がありますか？ – phillipsK

Excel VBAは、カット後に空行を削除します

答えて

関連する問題