Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3432 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【62209】選択した範囲のa列とe列を消す たく 09/7/1(水) 14:41 質問[未読]
【62210】Re:選択した範囲のa列とe列を消す つん 09/7/1(水) 14:48 回答[未読]
【62211】Re:選択した範囲のa列とe列を消す たく 09/7/1(水) 15:01 お礼[未読]
【62270】Re:選択した範囲のa列とe列を消す たく 09/7/6(月) 10:55 質問[未読]
【62271】Re:選択した範囲のa列とe列を消す つん 09/7/6(月) 11:10 回答[未読]
【62277】Re:選択した範囲のa列とe列を消す たく 09/7/6(月) 12:57 お礼[未読]
【62209】選択した範囲のa列とe列を消す
質問  たく  - 09/7/1(水) 14:41 -
引用なし
パスワード
   下記のようにしてみましたが
エラーになります。
宜しくお願い致します。
Selection.Range("A:A,E:E").ClearContents
【62210】Re:選択した範囲のa列とe列を消す
回答  つん  - 09/7/1(水) 14:48 -
引用なし
パスワード
   ▼たく さん：
こんにちは＾＾

>Selection.Range("A:A,E:E").ClearContents

こういう書き方はなさそうです。

Intersect(Selection, Range("A:A,E:E")).ClearContents

で、どうですか？
【62211】Re:選択した範囲のa列とe列を消す
お礼  たく  - 09/7/1(水) 15:01 -
引用なし
パスワード
   つんさん　出来ました。
有り難うございました。
【62270】Re:選択した範囲のa列とe列を消す
質問  たく  - 09/7/6(月) 10:55 -
引用なし
パスワード
   すみませんが、下のコードに
38行ごとのA10：E20以内で
選択範囲した所だけクリアしたいと思います。
宜しくお願い致します。

例　選択範囲がA2：E10しても　A10：E10のa列とe列だけがクリアされる。

Intersect(Selection, Range("A:A,E:E")).ClearContents
【62271】Re:選択した範囲のa列とe列を消す
回答  つん  - 09/7/6(月) 11:10 -
引用なし
パスワード
   ▼たく さん：
おはようございます。

３８行毎ってのがわかりませんが・・・・

>38行ごとのA10：E20以内で

>Intersect(Selection, Range("A:A,E:E")).ClearContents

「Intersect メソッド」は、３つ以上でもセル範囲を指定できますので、

「A10：E20」の範囲も指定してみたらどうでしょう？
【62277】Re:選択した範囲のa列とe列を消す
お礼  たく  - 09/7/6(月) 12:57 -
引用なし
パスワード
   つんさん
>「A10：E20」の範囲も指定してみたらどうでしょう？
やって見ます。有り難うございました。
　
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3432 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free