|
▼かみちゃん さん:
こんにちは。AT です。
回答を頂きまして、どうもありがとうございます。
>A列の値が入っている最終行より下の行以下を削除したい
Range(Range("A" & Rows.Count).End(xlUp).Offset(1), Range("P" & Rows.Count)).Select
Selection.Delete Shift:=xlUp
Range(Range("A" & Rows.Count).End(xlUp).Offset(1), Range("P" & Rows.Count)).Delete Shift:=xlUp
↑上記のマクロを組み込んで動作確認を行ったところ、
不要セルを見事に削除することが出来ました。
>今回の質問とは関係ないかもしれませんが、
>AccessからどのようにExcelに取得しているのでしょうか?
外部データのエクスポート先をEXCELファイル(xlsx)に指定して
データの取り込みしています。
>ExcelからAccessのデータをVBAでCopyFromRecordsetを使って、抽出できるのはご存知ですか?
すみません。
知りませんでした。(まだまだ、未熟です。。。)
CopyFromRecordsetとは、どのような機能なのですか?
どのような場面で使用するのか、教えて頂けませんか?
|
|