[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『最終入力セル以降削除』(ロク)
A1からC100までデータが入っています。(C50の時もC3000の時もあります) D1からF5000までデータが入ってます。 毎回C列の最終行は変化するのですがC列の最終行+1以降は必要ないため 毎回削除を行いたいのです。 C列の最終行+1以降のデータを毎回削除するマクロは可能でしょうか? マクロの知識はあまりありませんがよろしくお願いします。
< 使用 Excel:Excel2010、使用 OS:Windows7 >
素人が作ったマクロですが…
Sub 削除()
Dim LastRow As Long
Application.ScreenUpdating = False
LastRow = Cells(Rows.Count, 3).End(xlUp).Row + 1 Rows(LastRow & ":5000").Delete
Application.ScreenUpdating = True
End Sub (se_9) 2014/10/28(火) 15:04
閲覧者ですが (se_9)さんのマクロでできましたけど・・。 どのようにされたのでしょう。 C列最終行+1以降のD列:F列のデーター消えましたけど。 (奮闘中) 2014/10/29(水) 11:46
すみません。できました。ありがとうございました。 (ロク) 2014/10/30(木) 14:49
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.