Excel VBA質問箱 IV

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

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


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

【50602】Selectメソッドの失敗 Misako 07/8/4(土) 7:44 質問[未読]
【50603】Re:Selectメソッドの失敗 ichinose 07/8/4(土) 7:54 発言[未読]
【50676】Re:Selectメソッドの失敗 Misako 07/8/8(水) 23:12 お礼[未読]

【50602】Selectメソッドの失敗
質問  Misako  - 07/8/4(土) 7:44 -

引用なし
パスワード
   質問させていただきます

標準モジュールのこのコードは動作しますが
Sub Select_A()
 Sheets("一覧表").Activate
 Range("C5").Select
End Sub

Sheet1に同じコードを書いてもエラー「実行時エラー1004」(セレクトメッソドが失敗しました)が出ます。
どこが問題なのでしょうか?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  Sheets("一覧表").Activate
  Range("C6").Select
End Sub

【50603】Re:Selectメソッドの失敗
発言  ichinose  - 07/8/4(土) 7:54 -

引用なし
パスワード
   ▼Misako さん:
おはようございます。
以前も同じ質問がありました。

>
>標準モジュールのこのコードは動作しますが
>Sub Select_A()
> Sheets("一覧表").Activate
> Range("C5").Select
>End Sub
>
>Sheet1に同じコードを書いてもエラー「実行時エラー1004」(セレクトメッソドが失敗しました)が出ます。
>どこが問題なのでしょうか?
>Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  with Sheets("一覧表")
    .Activate
   .range("c6").Select
    end with

>End Sub

にしてください。

理由は、

www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=46598;id=excel#46617

↑この過去ログから、解明してください。

【50676】Re:Selectメソッドの失敗
お礼  Misako  - 07/8/8(水) 23:12 -

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

お礼が遅くなりました。
よく理解できました。これからもよろしくお願いします。

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