Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6023 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【47736】Selectメソッドで失敗します コウ 07/3/21(水) 11:17 質問[未読]
【47737】Re:Selectメソッドで失敗します ウッシ 07/3/21(水) 11:42 発言[未読]
【47738】Re:Selectメソッドで失敗します りん 07/3/21(水) 11:43 回答[未読]
【47739】Re:Selectメソッドで失敗します コウ 07/3/21(水) 11:49 お礼[未読]
【47736】Selectメソッドで失敗します
質問  コウ  - 07/3/21(水) 11:17 -
引用なし
パスワード
   お世話になります。

Widows2000,Exel2000の環境で、下記のコードを実行するとエラーになります。

wb2.Worksheets(strSheetName2).Range(wb2.Worksheets(strSheetName2). _
　　Cells(7, 1), wb2.Worksheets(strSheetName2).Cells(8, 2)).Select

※1つ目のブックのシートのマクロから、2つめのブックのシートの範囲指定
　をしたいのです。範囲指定したいセルには値は入っています。

もともと2つ目のブックのシートのソートをしたいのですが、うまくいかないので、
範囲指定の部分を試したのですがうまくいきません。

ご教授いただければ幸いです。

よろしくお願いいたします。
【47737】Re:Selectメソッドで失敗します
発言  ウッシ  - 07/3/21(水) 11:42 -
引用なし
パスワード
   こんにちは

Selectする必要が無い処理かと思います。
Selectしない書き方を習得した方がいいですよ。

もしSelectするとしたも、

Application.GoTo wb2.Worksheets(strSheetName2).Cells(7, 1).Riseize(2, 2)

のようにすればいいかと。
【47738】Re:Selectメソッドで失敗します
回答  りん E-MAIL  - 07/3/21(水) 11:43 -
引用なし
パスワード
   コウ さん、こんにちわ。

>wb2.Worksheets(strSheetName2).Range(wb2.Worksheets(strSheetName2). _
>　　Cells(7, 1), wb2.Worksheets(strSheetName2).Cells(8, 2)).Select
>

>※1つ目のブックのシートのマクロから、2つめのブックのシートの範囲指定
>　をしたいのです。範囲指定したいセルには値は入っています。
ソートをしたいだけならSelectは不要ですが、エラーの原因はSelectしたいセルのあるシートがアクティブでないからと思われます。

　 With wb2.Worksheets(StrSheetName2)
　　　'Selectしたいセルのあるシートがアクティブでないとエラーになります
　　　.Activate
　　　.Range(.Cells(7, 1), .Cells(8, 2)).Select
　 End With
【47739】Re:Selectメソッドで失敗します
お礼  コウ  - 07/3/21(水) 11:49 -
引用なし
パスワード
   ウッシさん、りんさん返信ありがとうございます。
教えていただいた方法でやってみます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
6023 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free