Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

48753 / 76732

←次へ　｜　前へ→


	【32910】Re:ブック内の不要データを削除するには

かみちゃん - 05/12/26(月) 22:51 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>まず削除するのはＡ，Ｂ列、その後は一行目のタイトルを残して、
>二行目から最後まで、タイトルが入っている行を削除します。

手作業でも十分できる操作かと思いますが、

1.オートフィルタでタイトル行を抽出する。
　タイトル行は、A列が「都道府県」となっている行とする。
2.抽出された行を1行目を除いて、すべて削除する。
　これで、２行目以降のタイトル行が削除される。
3.A列とB列を削除する。

以上の手順を「マクロの記録」で記録してみると、VBAのコードができます。
それを整理したものが以下のような感じです。

Sub Macro1()
　With Range("A1")
　　.AutoFilter Field:=1, Criteria1:="都道府県"
　　Rows("2:65536").Delete Shift:=xlUp
　　.AutoFilter
　End With
　Columns("A:B").Delete Shift:=xlToLeft
　Range("A1").Select
End Sub

3 hits

▼

【32907】ブック内の不要データを削除するには MoritaＫ 05/12/26(月) 22:33