Làm thế nào để bạn lấy Excel làm mới dữ liệu trên trang tính từ bên trong VBA?

Question

Làm thế nào để bạn nhận được dữ liệu bảng tính trong Excel để tính toán lại chính nó từ bên trong VBA, mà không có kluge chỉ thay đổi một giá trị ô?

Answer 1

Những dòng này sẽ làm các trick:

ActiveSheet.EnableCalculation = False 
ActiveSheet.EnableCalculation = True 

Edit: Phương pháp .Calculate() sẽ không làm việc cho tất cả các chức năng, tôi thử nghiệm nó trên một tờ với các chức năng mảng add-in. Các tờ sản xuất tôi đang sử dụng là phức tạp, đủ Tôi không muốn thử và thử nghiệm .CalculateFull() phương pháp, do đó, nó có thể làm việc.

Answer 2

này nên làm các trick ...

'recalculate all open workbooks 
Application.Calculate 

'recalculate a specific worksheet 
Worksheets(1).Calculate 

' recalculate a specific range 
Worksheets(1).Columns(1).Calculate 

Answer 3

Bạn cũng có thể thử

Application.CalculateFull 

hoặc

Application.CalculateFullRebuild 

nếu bạn không nhớ xây dựng lại tất cả các workbook mở, chứ không phải không chỉ là trang tính hoạt động. (CalculateFullRebuild cũng xây dựng lại các phụ thuộc.)

Answer 4

Đôi khi Excel sẽ nấc cục và cần khởi động lại để áp dụng lại một phương trình. Điều này xảy ra trong một số trường hợp khi bạn đang sử dụng các công thức tùy chỉnh.

Hãy chắc chắn rằng bạn có kịch bản sau đây

ActiveSheet.EnableCalculation = True 

Áp dụng lại phương trình của sự lựa chọn.

Cells(RowA,ColB).Formula = Cells(RowA,ColB).Formula 

Điều này sau đó có thể được lặp lại nếu cần.

Answer 5

Tôi gặp sự cố khi tắt hình nền (hình mờ DRAFT) trong VBA. Thay đổi của tôi không hiển thị (được thực hiện với phương pháp Sheets(1).PageSetup.CenterHeader = "") - vì vậy tôi cần một cách để làm mới. Cách tiếp cận ActiveSheet.EnableCalculation một phần đã làm các trick, nhưng không bao gồm các tế bào không sử dụng.

Cuối cùng tôi tìm thấy những gì tôi cần với một lót mà làm biến mất hình ảnh khi nó đã không còn thiết lập: -

Application.ScreenUpdating = True