Excel VBA質問箱 IV

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

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


4139 / 13644 ツリー ←次へ | 前へ→

【58204】行を削除するには よう 08/10/11(土) 17:29 質問[未読]
【58205】Re:行を削除するには kanabun 08/10/11(土) 18:00 発言[未読]
【58215】Re:行を削除するには よう 08/10/12(日) 0:31 お礼[未読]
【58233】Re:行を削除するには よう 08/10/13(月) 8:47 質問[未読]
【58234】Re:行を削除するには かみちゃん 08/10/13(月) 8:54 発言[未読]
【58238】Re:行を削除するには よう 08/10/13(月) 12:45 お礼[未読]

【58204】行を削除するには
質問  よう  - 08/10/11(土) 17:29 -

引用なし
パスワード
   文字が書かれていない行を削除したいと思います。1行毎に文字が書かれていない空白があります。

例えばマウスで、C5〜C50の範囲を選択すれば、C6、C8、C10、C12、C14、C16、C18・・・の行を
削除することができるでしょうか?

【58205】Re:行を削除するには
発言  kanabun  - 08/10/11(土) 18:00 -

引用なし
パスワード
   ▼よう さん:

>文字が書かれていない行を削除したいと思います。1行毎に文字が書かれていない空白があります。
>
>例えばマウスで、C5〜C50の範囲を選択すれば、C6、C8、C10、C12、C14、C16、C18・・・の行を
>削除することができるでしょうか?

できます。
準備として、ツールバーに「行削除」アイコンを表示しておいてください。
(メニュ−[ツール]-[ユーザー設定]-[コマンド]タブ- 分類[編集]のなかに
 このアイコンはあります。これをツールバーのお好きな場所にドラッグして
 おいてください)

手順
(1)C5〜C50の範囲を選択
(2)[F5]キーを押してジャンプダイアログの左下にある〔セル選択...〕ボタンを
  押し、この中から「空白セル」をONにして [OK]
(3)ツールバーの「行の削除」ボタンを押す

操作は、これだけです。
この操作をマクロ記録して編集すれば、コードが得られます。

【58215】Re:行を削除するには
お礼  よう  - 08/10/12(日) 0:31 -

引用なし
パスワード
   kanabun さん、こんばんは。 このような使い方があるのですね!

有難うございます!

【58233】Re:行を削除するには
質問  よう  - 08/10/13(月) 8:47 -

引用なし
パスワード
   マクロを実行するとエラーになるのですが、どうすればよいでしょうか?

重複する選択範囲に対してそのコマンドを使用することはできません。
デバックをクリックすると、下記で止まってるみたいです。
Selection.EntireRow.Delete

宜しくお願いします。

【58234】Re:行を削除するには
発言  かみちゃん  - 08/10/13(月) 8:54 -

引用なし
パスワード
   こんにちは。かみちゃん です。

横から失礼します。

>マクロを実行するとエラーになるのですが、どうすればよいでしょうか?

再現できるようコードを提示していただくことはできませんか?

【58238】Re:行を削除するには
お礼  よう  - 08/10/13(月) 12:45 -

引用なし
パスワード
   こんにちは、かみちゃん。 列範囲指定を1列にすると上手くいきました。

有難うございます。

4139 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free