Excel VBA質問箱 IV

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

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


43381 / 76732 ←次へ | 前へ→

【38400】Re:同一名で始まるシートをすべて選択するには?
回答  Kein  - 06/6/1(木) 22:19 -

引用なし
パスワード
   先の質問内容とはぜんぜん違いますね。シートを対象にするのとセル範囲を
対象にする処理とは、全く異なりますよ。だから Select True などは
エラーになって当然です。
そもそも何かの処理をしたいとき、いちいちオブジェクトを Select する
必要など殆どないのです。VBAに慣れた人は、それをやると処理効率が悪くなる
ことを知っているので誰も Select や Activate を多用するようなコードを
書きません。ま、それでもと言うなら↓こんなコードで出来ると思いますが。

Sub MyCells_Select()
  On Error Resume Next
  With Range("A7", Range("A65536").End(xlUp)).Offset(, 255)
   .Formula = "=IF(LEFT($A7,3)=""123"",1,"""")"
   .SpecialCells(3, 1).Offset(, -255).Select
   .ClearContents
  End With
End Sub
0 hits

【38282】同一名で始まるシートをすべて選択するには? Cuore=Tane 06/5/30(火) 22:24 質問
【38284】Re:同一名で始まるシートをすべて選択する... MARBIN 06/5/30(火) 22:32 発言
【38300】Re:同一名で始まるシートをすべて選択する... Kein 06/5/31(水) 3:24 回答
【38359】Re:同一名で始まるシートをすべて選択する... ToshiyoriB 06/5/31(水) 21:58 質問
【38364】Re:同一名で始まるシートをすべて選択する... Kein 06/5/31(水) 22:20 回答
【38399】Re:同一名で始まるシートをすべて選択する... ToshiyoriB 06/6/1(木) 21:59 質問
【38400】Re:同一名で始まるシートをすべて選択する... Kein 06/6/1(木) 22:19 回答
【38477】Re:同一名で始まるシートをすべて選択する... Cuore=Tane 06/6/3(土) 21:28 お礼

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