Cuộn đồng bộ với nhiều hơn hai Windows (Microsoft Excel)
David có một trang tính lớn mà anh ấy cần xem trong ba cửa sổ khác nhau và để chúng cuộn tất cả cùng một lúc. Anh ấy biết cách sử dụng “view side by side” và bật tính năng cuộn đồng bộ, nhưng nó dường như chỉ hoạt động với hai cửa sổ. David tự hỏi liệu có cách nào để làm điều đó cho ba người.
Không có cách nào để thực hiện thao tác cuộn đồng bộ trong Excel với nhiều hơn hai cửa sổ. Tùy thuộc vào nhu cầu của bạn (và bản chất dữ liệu của bạn), bạn có thể giải quyết vấn đề này bằng cách chia nhỏ các cửa sổ một cách sáng tạo, sao cho bạn có hai cửa sổ thực tế, nhưng một trong số chúng được tách ra để hiển thị hai phần khác nhau của cùng một trang tính .
Nếu điều đó không phù hợp với nhu cầu của bạn, điều duy nhất bạn có thể làm là mô phỏng tính đồng bộ giữa các cửa sổ. Việc này phải được thực hiện bằng macro, tương tự như sau:
Sub SynchSheets() ' Duplicates the active sheet's cell position in each sheet If TypeName(ActiveSheet) <> "Worksheet" Then Exit Sub Dim shUser As Worksheet Dim sht As Worksheet Dim lTopRow As Long Dim lLeftCol As Long Dim sAddr As String Application.ScreenUpdating = False ' Note the current sheet Set shUser = ActiveSheet ' take information from current sheet With ActiveWindow lTopRow = .ScrollRow lLeftCol = .ScrollColumn sAddr = .RangeSelection.Address End With ' loop through worksheets For Each sht In ActiveWorkbook.Worksheets If sht.Visible Then 'skip hidden sheets sht.Activate Range(sAddr).Select ActiveWindow.ScrollRow = lTopRow ActiveWindow.ScrollColumn = lLeftCol End If Next sht shUser.Activate Application.ScreenUpdating = True End Sub
Macro này về cơ bản từng bước qua từng trang tính trong sổ làm việc và làm cho cùng một ô hoạt động và hiển thị trong mỗi trang tính. Nếu bạn bắt đầu với các trang tính của mình được hiển thị trên màn hình, thì macro sẽ “đồng bộ hóa” những gì bạn thấy trong mỗi trang tính để nó giống nhau.
_Lưu ý: _
Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.
ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.
Mẹo này (9777) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel trong Office 365.