メインコンテンツへスキップ

ブックのすべてのワークシートをExcelで選択した同じ範囲と同期するにはどうすればよいですか?

Excelブックを使用する場合、ワークブック内の複数のワークシートの同じ範囲を選択し、それらを同期して、情報を簡単かつ便利に確認する必要がある場合があります。 次の方法では、ワークシートを同期して、ワークブック内の同じ範囲をすばやく簡単に作成できます。

ドキュメントと同じ範囲のワークシート-5 ドキュメントと同じ範囲のワークシート-6

[すべてのシートを選択]を使用して、すべてのワークシートで同じ範囲を選択します

同じ範囲のすべてのワークシートをワンクリックですばやく同期

VBAコードを使用してワークシートを同期する


[すべてのシートを選択]を使用して、すべてのワークシートで同じ範囲を選択します

次のように、すべてのワークシートでワークブックで同じ範囲を選択することができます。

1。 すべてのワークシートで選択するアクティブなワークシートの範囲を選択します。 たとえば、範囲A103:C112

2。 次に、ワークシートタブを右クリックして、 すべてのシートを選択 メニューから。 スクリーンショットを参照してください:

ドキュメントと同じ範囲のワークシート-1

3。 ブック内のすべてのワークシートで同じ範囲が選択されます。

注: この方法ですべてのワークシートで同じ範囲を選択するには、すべてのワークシートで同じ範囲しか選択できませんが、選択したすべての範囲をウィンドウの同じ位置に表示することはできません。

ワンクリックですべてのワークシートを同じ範囲にすばやく同期

あなたがインストールしている場合 Kutools for Excel、あなたは ワークシートを同期する 次のように、すべてのワークシートを簡単に同期して同じ範囲にする機能:

Kutools for Excel:300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます。 今すぐ入手

1。 ワークシートをアクティブにして、使用する範囲を選択します。

2に設定します。 OK をクリックします。 Enterprise > ワークシートツール > ワークシートを同期する、スクリーンショットを参照してください:

ドキュメントと同じ範囲のワークシート-3

3。 また、ワークブック内のすべてのワークシートに同じ選択範囲と左上のセルがあることを通知するプロンプトボックスが表示されます。

ドキュメントと同じ範囲のワークシート-4

4。 次に、をクリックします OK、すべてのワークシートが同期されています。すべてのワークシート間を移動すると、各ワークシートの範囲が同じになります。 スクリーンショットを参照してください:

ドキュメントと同じ範囲のワークシート-5 ドキュメントと同じ範囲のワークシート-6
ドキュメントと同じ範囲のワークシート-7 ドキュメントと同じ範囲のワークシート-8
Note:チェックした場合 次回は見せないで セクションに ワークシートを同期する プロンプトボックス。次回この機能を適用すると、このボックスは表示されません。

ヒント:

VBAコードを使用してワークシートを同期する

次のVBAコードを使用すると、すべてのワークシートで同じ範囲をすばやく選択して、選択した範囲をウィンドウの同じ位置に表示できます。

1。 XNUMXつのワークシートで範囲を選択し、[ Developer >ビジュアルベーシック、新しいです Microsoft Visual Basic forApplicationsウィンドウ 表示されます、

2。 クリック インセット > モジュール、次に、次のコードをコピーしてモジュールに貼り付けます。

VBA:ブックのすべてのワークシートを同期します

Sub SynchSheets()
'Update 20130912
Dim WorkShts As Worksheet
Dim sht As Worksheet
Dim Top As Long
Dim Left As Long
Dim RngAddress As String
Application.ScreenUpdating = False
Set WorkShts = Application.ActiveSheet
Top = Application.ActiveWindow.ScrollRow
Left = Application.ActiveWindow.ScrollColumn
RngAddress = Application.ActiveWindow.RangeSelection.Address
For Each sht In Application.Worksheets
    If sht.Visible Then
        sht.Activate
        sht.Range(RngAddress).Select
        ActiveWindow.ScrollRow = Top
        ActiveWindow.ScrollColumn = Left
    End If
Next sht
WorkShts.Activate
Application.ScreenUpdating = True
End Sub

3。 次に、をクリックします ドキュメントと同じ範囲のワークシート-2 ボタンまたは F5 キーを押してコードを実行すると、すべてのワークシートで同じ範囲が選択され、選択した範囲がウィンドウの同じ位置に表示されます。

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations