Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

73274 / 76807

←次へ　｜　前へ→


	【8016】Re:Rangeについて

Jaka - 03/9/26(金) 15:57 -


	引用なし

	パスワード

おじゃまします。

>Thisworkbook.Activesheet.Range("B" & cnt).Select
エクセルから見たらアクティブシートは１つしかありませんから、このマクロが書いてあるブックのアクティブシートという表現は正しくありません。（他ブックも開いていた場合等も考えると．．。）

つんさんの
>Thisworkbook.Worksheets("Sheet1").Range("B" & cnt).Select
も、場合によってはエラーになると思います。
突っ込んでごめんなさい。
お元気ですか？

多分、他ブックがアクティブ状態からでしょうから、順番にアクティブにして行かないとエラーになると思います。

ThisWorkbook.Activate
Worksheets("Sheet1").Select
Range("B" & cnt).Select

値の取得だったら
aa = Thisworkbook.Worksheets("Sheet1").Range("B" & cnt).value

書きこむんだったら
Thisworkbook.Worksheets("Sheet1").Range("B" & cnt).value = "あああ"

と、書けないば良いです。

全くでたらめな事書いてましたら、ごめんなさい。

0 hits

▼

【8012】Rangeについて DORA 03/9/26(金) 15:23