
Worksheets("シート名").Activate
上記のを行ってから別シートの値を取得するのですが、
この処理を行うと指定したシートへ強制的にとんでしまいます。。。
※イメージ
For ~ To ~
Worksheets("シートA").Activate
シートAの値取得
:
Worksheets("シートB").Activate
シートBの値取得
Next
このイメージ処理を行うとものすごい勢いで画面がチカチカします。。。
シートを変えずに他のシートから値を取得する方法はないのでしょうか。
教えてください!

No.3
- 回答日時:
Activate しなければいいのでは?
Dim Value1, Value2
Value1 = ThisWorkbook.Worksheets("シートA").Cells(1, 1).Value
Value2 = ThisWorkbook.Worksheets("シートB").Cells(1, 1).Value
とか。
セル番地の書き方を ThisWorkbook からフルで書けば、複数のブックが開いている状態でも VBA 実行中のブックの特定のシートの特定のセルに直接アクセスできます。
面倒なら
Dim SheetA As Worksheet, SheetB As Worksheet
Set SheetA = ThisWorkbook.Worksheets("シートA")
Set SheetB = ThisWorkbook.Worksheets("シートB")
Dim Value1, Value2
For ~
Value1 = SheetA.Cells(1, 1).Value
Value2 = SheetB.Cells(1, 1).Value
Next
とか
No.1
- 回答日時:
処理の直前(forの前)に
Application.ScreenUpdating = False
処理の直後(nextの後)に
Application.ScreenUpdating = True
を入れてみたら、どうなりますか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
確定申告しなかった・無申告の人をどうやって見つけるのか元国税調査官に聞いてみた
無申告の方などを対象に税務調査を行う国税局の元税務調査官さんに、どう無申告を探すのか聞いてきました。
-
エクセル VBA find は別シートを検索できますでしょうか?
Excel(エクセル)
-
vba 2つの条件が一致したらコピーして別シートに値のみ貼り付け
Visual Basic(VBA)
-
エクセルVBA 別シートの複数のセルの値をコピーする方法
Excel(エクセル)
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
6
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
7
別のシートを参照して計算する方法
Visual Basic(VBA)
-
8
【VBA】 別シートを検索し、一致した値より指定した数だけ移動したセルから下全てをコピペ
Excel(エクセル)
-
9
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
-
10
Exel VBA 別ブックから該当データを検索し、必要なデータを取得する方法について
Visual Basic(VBA)
-
11
VBA 別シートのセルから、文字列を参照するには?
Visual Basic(VBA)
-
12
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
13
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
14
EXCEL VBAで別のシートに値を渡したいのですが・・・
その他(ソフトウェア)
-
15
'Range'メソッドは失敗しました
Excel(エクセル)
-
16
EXCEL あるセルに数字が入力されれば既存マクロ実行させたい
Excel(エクセル)
-
17
VBAで条件が一致する行のデータを別シートに抽出
Excel(エクセル)
-
18
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
19
VBA Cのセルが空白でなかったら、Aのセルに順番に数値を入力
Visual Basic(VBA)
-
20
セルの値と同じ名前のシートをアクティブにするには?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
ExcelのVBAのマクロで他のシー...
-
5
エクセルのシート名変更で重複...
-
6
Excel VBA 複数行を数の分だけ...
-
7
重複するidをデータごとにまと...
-
8
IFステートの中にWithステート...
-
9
ブック名、シート名を他のモジ...
-
10
エクセル・マクロ シートの非...
-
11
【ExcelVBA】全シートのセルの...
-
12
XL:BeforeDoubleClickが動かない
-
13
EXCEL(VBA)でシート保護がかか...
-
14
シートが保護されている状態で...
-
15
異なるシート間で「値だけの貼り...
-
16
ExcelのVBAを使い、複数シート...
-
17
【VBA】指定した検索条件に一致...
-
18
Excel チェックボックスにチェ...
-
19
ワークシートごとに計算結果
-
20
コマンドボタンをクリックでシ...
おすすめ情報
公式facebook
公式twitter