Note: The other languages of the website are Google-translated. Back to English

Làm cách nào để lọc bảng Pivot dựa trên một giá trị ô cụ thể trong Excel?

Thông thường, chúng tôi đang lọc dữ liệu trong Pivot Table bằng cách chọn các mục trong danh sách thả xuống như được hiển thị trong ảnh chụp màn hình bên dưới. Trên thực tế, bạn có thể lọc bảng tổng hợp dựa trên giá trị trong một ô cụ thể. Phương pháp VBA trong bài viết này sẽ giúp bạn giải quyết vấn đề.

Lọc Bảng tổng hợp dựa trên giá trị ô cụ thể với mã VBA


Lọc Bảng tổng hợp dựa trên giá trị ô cụ thể với mã VBA

Mã VBA sau có thể giúp bạn lọc Bảng Pivot dựa trên giá trị ô cụ thể trong Excel. Hãy làm như sau.

1. Vui lòng nhập một giá trị mà bạn sẽ lọc Bảng Pivot dựa vào trước vào một ô (ở đây tôi chọn ô H6).

2. Mở trang tính có chứa Pivot Table, bạn sẽ lọc theo giá trị ô. Sau đó nhấp chuột phải vào tab trang tính và chọn Mã Chế độ xem từ trình đơn ngữ cảnh. Xem ảnh chụp màn hình:

3. Trong phần mở đầu Microsoft Visual Basic cho các ứng dụng cửa sổ, sao chép mã VBA bên dưới vào cửa sổ Mã.

Mã VBA: Lọc Bảng Pivot dựa trên giá trị ô

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
    Dim xPTable As PivotTable
    Dim xPFile As PivotField
    Dim xStr As String
    On Error Resume Next
    If Intersect(Target, Range("H6:H7")) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
    Set xPFile = xPTable.PivotFields("Category")
    xStr = Target.Text
    xPFile.ClearAllFilters
    xPFile.CurrentPage = xStr
    Application.ScreenUpdating = True
End Sub

Chú ý: Trong mã,

1) "Sheet1”Là tên của trang tính.
2) "PivotTable2”Là tên của Pivot Table.
3) Trường lọc trong bảng tổng hợp được gọi là "Phân loại".
4) Giá trị bạn muốn lọc bảng tổng hợp được đặt trong ô H6.
Bạn có thể thay đổi các giá trị biến ở trên khi cần.

4. Nhấn nút Khác + Q chìa khóa để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.

Sau đó, Pivot Table đang lọc dựa trên giá trị trong ô H6 như ảnh chụp màn hình bên dưới:

Bạn có thể thay đổi giá trị ô thành những giá trị khác nếu bạn cần.

Chú thích: Các giá trị bạn nhập vào ô H6 phải khớp chính xác với các giá trị trong danh sách Danh mục thả xuống của Pivot Table.


Các bài liên quan:


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (23)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bằng cách sử dụng mã này (tất nhiên được cập nhật cho các biến của tôi), khi thay đổi trường, bộ lọc sẽ thay đổi ngay lập tức thành đúng và sau đó tự xóa gần như ngay lập tức. Đang cố gắng tìm ra lý do tại sao nó lại làm như vậy (tự hỏi liệu nó có liên quan gì đến ClearAllFilters ở cuối sub không?)
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn sẽ làm điều này như thế nào với bộ lọc báo cáo có phân cấp?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào! Cảm ơn vì macro của bạn.

Tôi đã cố gắng sử dụng nó cho nhiều bảng tổng hợp trong cùng một trang, nhưng nó không hoạt động. Tôi đã viết nó như thế này:

Private Sub Worksheet_Change (ByVal Target As Range)
Làm mờ xPTable1 dưới dạng PivotTable
Làm mờ xPFile1 dưới dạng PivotField
Làm mờ xStr1 dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("D7")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable1 = Worksheets ("BUSCADOR"). PivotTables ("PV_ETAPA1")
Đặt xPFile1 = xPTable1.PivotFields ("ETAPA1")
xStr1 = Mục tiêu.Văn bản
xPFile1.ClearAllFilters
xPFile1.CienPage = xStr1
Application.ScreenUpdating = True

Làm mờ xPTable2 dưới dạng PivotTable
Làm mờ xPFile2 dưới dạng PivotField
Làm mờ xStr2 dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("G7")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable2 = Worksheets ("BUSCADOR"). PivotTables ("PV_ETAPA2")
Đặt xPFile2 = xPTable2.PivotFields ("ETAPA2")
xStr2 = Mục tiêu.Văn bản
xPFile2.ClearAllFilters
xPFile2.CienPage = xStr2
Application.ScreenUpdating = True

End Sub

Có lẽ bạn có thể giúp tôi ra ngoài!

Cảm ơn trước!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hi


cảm ơn vì Macro


Tôi đang thử điều tương tự nhưng không thể làm cho nó hoạt động trên 2 bảng. cả hai đều đang nhìn vào cùng một ô chỉ là 2 bảng tổng hợp khác nhau


cảm ơn
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn phải thay đổi tên Pivot Table. Mỗi bảng tổng hợp có một tên khác nhau. để có được điều đó, hãy nhấp chuột phải vào pivot và chọn cài đặt bảng pivot, tên sẽ ở trên cùng
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bonjour,

Je ne comprends pas comment ajouter le nom du second TCD dans la macro pour que cela fonctionne sur les deux.
Pourriez-vous m'aider?

Merci
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào vì một số lý do, macro này sau khi vào trang cơ bản trực quan, hoàn toàn không hiển thị. Tôi không thể bật / chạy macro này, tôi đã kiểm tra tất cả cài đặt trung tâm tin cậy, nhưng không có gì xảy ra, vui lòng giúp tôi
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, dường như tôi không thể làm việc này. Ô mà tôi muốn tham chiếu đến được kéo vào từ một công thức - đây có phải là lý do tại sao bộ lọc không thể tìm thấy nó vì nó đang xem xét công thức hơn là giá trị mà công thức trả về không? Cảm ơn trướcHeather McDonagh
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào Heather, bạn đã tìm ra giải pháp chưa. Tôi chỉ có cùng một vấn đề.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi đã có thể sửa đổi / lọc 3 trục xoay khác nhau nằm trên cùng một tab. Tôi cũng đã thêm một hàng trong tập dữ liệu của mình là "Không tìm thấy dữ liệu", nếu không nó sẽ để bộ lọc thành "TẤT CẢ" mà tôi không muốn. Trên đây là sự trợ giúp đắc lực giúp tôi kiếm được Kudo với ban quản lý nên tôi muốn chia sẻ. Lưu ý rằng (Tất cả) phân biệt chữ hoa chữ thường, tôi phải mất một chút thời gian để tìm ra điều đó.
Private Sub Worksheet_Change (ByVal Target As Range)
'kiểm tra
Làm mờ xPTable thành PivotTable
Làm mờ xPFile dưới dạng PivotField
Làm mờ xStr dưới dạng chuỗi

Dim x2PTable Như PivotTable
Làm mờ x2PFile dưới dạng PivotField
Làm mờ x2Str dưới dạng chuỗi

Dim x3PTable Như PivotTable
Làm mờ x3PFile dưới dạng PivotField
Làm mờ x3Str dưới dạng chuỗi

On Error Resume Next
Nếu Intersect (Target, Range ("a2: e2")) Không có gì thì Thoát Sub

Application.ScreenUpdating = Sai

'tbl-1
Đặt xPTable = Worksheets ("Graphical"). PivotTables ("PivotTable1")
Đặt xPFile = xPTable.PivotFields ("Bộ phận MR - Bộ phận")
xStr = Mục tiêu.Văn bản
xPFile.ClearAllFilters
xPFile.CienPage = xStr
Nếu xPFile.CurrentPage = "(Tất cả)" thì xPFile.CurrentPage = "Không tìm thấy dữ liệu"

'tbl-2
Đặt x2PTable = Worksheets ("Đồ họa"). PivotTables ("PivotTable2")
Đặt x2PFile = x2PTable.PivotFields ("Bộ phận MR - Bộ phận")
x2Str = Mục tiêu.Văn bản
x2PFile.ClearAllFilters
x2PFile.CienPage = x2Str
Nếu x2PFile.CurrentPage = "(Tất cả)" thì x2PFile.CurrentPage = "Không tìm thấy dữ liệu"

'tbl-3
Đặt x3PTable = Worksheets ("Đồ họa"). PivotTables ("PivotTable3")
Đặt x3PFile = x3PTable.PivotFields ("Bộ phận MR - Bộ phận")
x3Str = Mục tiêu.Văn bản
x3PFile.ClearAllFilters
x3PFile.CienPage = x3Str
Nếu x3PFile.CurrentPage = "(Tất cả)" thì x3PFile.CurrentPage = "Không tìm thấy dữ liệu"

Application.ScreenUpdating = True

End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều này có thể với các trang tính của google? Nếu vậy, làm thế nào?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Google Trang tính sẽ không yêu cầu bất kỳ bảng tổng hợp nào. bạn có thể trực tiếp thực hiện thông qua Chức năng Bộ lọc
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi muốn sử dụng nhiều mã Thay đổi trang tính trong cùng một trang tính. Làm thế nào để làm điều đó? Mã của tôi như sau:
Private Sub Worksheet_Change (ByVal Target As Range)
'Bộ lọc bảng tổng hợp dựa trên giá trị ô
Làm mờ xPTable thành PivotTable
Làm mờ xPFile dưới dạng PivotField
Làm mờ xStr dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("D20: D21")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable = Worksheets ("Sheet1"). PivotTables ("PivotTable2")
Đặt xPFile = xPTable.PivotFields ("Chỉ định")
xStr = Mục tiêu.Văn bản
xPFile.ClearAllFilters
xPFile.CienPage = xStr
Application.ScreenUpdating = True
End Sub

Private Sub Worksheet_Change2 (ByVal Target As Range)
'Bộ lọc bảng tổng hợp dựa trên giá trị ô 2
Làm mờ xPTable thành PivotTable
Làm mờ xPFile dưới dạng PivotField
Làm mờ xStr dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("H20: H21")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable = Worksheets ("Sheet1"). PivotTables ("PivotTable2")
Đặt xPFile = xPTable.PivotFields ("Cung cấp")
xStr = Mục tiêu.Văn bản
xPFile.ClearAllFilters
xPFile.CienPage = xStr
Application.ScreenUpdating = True
End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Olá, gostaria de saber se quisesse filtrar mas de uma Category como poderia ser?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều gì xảy ra nếu tôi muốn liên kết ô lựa chọn với một tab khác? Đây là mã của tôi cho đến nay
Private Sub Worksheet_Change (ByVal Target As Range)
Làm mờ xPTable1 dưới dạng PivotTable
Làm mờ xPFile1 dưới dạng PivotField
Làm mờ xStr1 dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("B1")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable1 = Worksheets ("SM_SKU PIVOTS"). PivotTables ("PivotTable1")
Đặt xPFile1 = xPTable1.PivotFields ("Địa lý")
xStr1 = Mục tiêu.Văn bản
xPFile1.ClearAllFilters
xPFile1.CienPage = xStr1
Application.ScreenUpdating = True

Làm mờ xPTable2 dưới dạng PivotTable
Làm mờ xPFile2 dưới dạng PivotField
Làm mờ xStr2 dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("B1")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable2 = Worksheets ("SM_SKU PIVOTS"). PivotTables ("PivotTable4")
Đặt xPFile2 = xPTable2.PivotFields ("Địa lý")
xStr2 = Mục tiêu.Văn bản
xPFile2.ClearAllFilters
xPFile2.CienPage = xStr2
Application.ScreenUpdating = True

Làm mờ xPTable3 dưới dạng PivotTable
Làm mờ xPFile3 dưới dạng PivotField
Làm mờ xStr3 dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("B1")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable3 = Worksheets ("SM_SKU PIVOTS"). PivotTables ("PivotTable8")
Đặt xPFile3 = xPTable3.PivotFields ("Địa lý")
xStr3 = Mục tiêu.Văn bản
xPFile3.ClearAllFilters
xPFile3.CienPage = xStr3
Application.ScreenUpdating = True

End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hello!

Tôi mới sử dụng VBA và tôi muốn có mã để chọn bộ lọc xoay vòng dựa trên phạm vi ô.
Làm cách nào để thay đổi "Trang hiện tại" thành một giá trị phạm vi?
Cảm ơn bạn!!
-------------------------------------------------- -----------------------------------------
Sub PrintTour ()

ActiveSheet.PivotTables ("PivotTable1"). PivotFields (_
"[Bereich 1]. [Tham quan]. [Tham quan]"). _
Xóa tất cả bộ lọc
ActiveSheet.PivotTables ("PivotTable1"). PivotFields (_
"[Bereich 1]. [Tham quan]. [Tham quan]"). _
CurrentPage = "[Bereich 1]. [Tham quan lt. Anlieferungstag]. & [4001-01]"
End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn rất nhiều cho mã này! Tôi đã làm cho nó hoạt động sau khi điều chỉnh để đáp ứng các trường của tôi, nhưng sau khi định dạng một số thay đổi trên trang tính của tôi, nó không hoạt động! Tôi đã chuyển nó từ A1 sang B1, thay đổi một số định dạng ô để làm cho nó nổi bật, v.v. Không có gì quá điên rồ nhưng bây giờ nó không cập nhật khi tôi thay đổi văn bản trong B1. Ai có ý tưởng gì không?

Private Sub Worksheet_Change (ByVal Target As Range)
'kiểm tra
Làm mờ xPTable thành PivotTable
Làm mờ xPFile dưới dạng PivotField
Làm mờ xStr dưới dạng chuỗi

Dim x2PTable Như PivotTable
Làm mờ x2PFile dưới dạng PivotField
Làm mờ x2Str dưới dạng chuỗi

Dim x3PTable Như PivotTable
Làm mờ x3PFile dưới dạng PivotField
Làm mờ x3Str dưới dạng chuỗi

On Error Resume Next
Nếu Intersect (Target, Range ("b1")) Không có gì thì Thoát Sub

Application.ScreenUpdating = Sai

'tbl-1
Đặt xPTable = Worksheets ("Báo cáo dòng"). PivotTables ("PivotTable7")
Đặt xPFile = xPTable.PivotFields ("Nguồn Utopia")
xStr = Mục tiêu.Văn bản
xPFile.ClearAllFilters
xPFile.CienPage = xStr

'tbl-2
Đặt x2PTable = Worksheets ("Báo cáo dòng"). PivotTables ("PivotTable2")
Đặt x2PFile = x2PTable.PivotFields ("Nguồn Utopia")
x2Str = Mục tiêu.Văn bản
x2PFile.ClearAllFilters
x2PFile.CienPage = x2Str

'tbl-3
Đặt x3PTable = Worksheets ("Báo cáo dòng"). PivotTables ("PivotTable3")
Đặt x3PFile = x3PTable.PivotFields ("Nguồn Utopia")
x3Str = Mục tiêu.Văn bản
x3PFile.ClearAllFilters
x3PFile.CienPage = x3Str

Application.ScreenUpdating = True

End Sub
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào Lance,
Tôi đã kiểm tra mã của bạn và nó hoạt động tốt trong trường hợp của tôi. Thay đổi định dạng ô không ảnh hưởng đến hoạt động của mã.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Nó hoạt động như thế nào với Power Pivot, khi sử dụng nhiều bảng? Tôi đã ghi lại macro thay đổi giá trị trong bộ lọc. Thực hiện một số thay đổi để làm cho mã trên hoạt động. Nhưng nó ném lỗi không khớp Loại. Không có vấn đề gì tôi làm.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào DK,
Phương pháp này không hoạt động đối với Power Pivot. Xin lỗi vì sự bất tiện.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bonjour,
Cảm ơn bạn rất nhiều vì những lời giải thích.

J'aimerai utiliser un filtre (1 ô) trong F4 par exemple qui filtrerait deux TCD qui sont sur la même feuille.

Cela fonctionne très bien avec un TCD mais dès que j'essaye de combiner le second, ça ne Marche pas.
Bạn có thể giúp tôi ?

Cảm ơn bạn rất nhiều
Ambrose
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bonjour,

Merci beaucoup pour cette explication qui Marche parfaitement.
Trong một lần đổi mới, j'aimerais pouvoir utiliser ce code pour pouvoir filterr deux tableaux croisés croisés dynamiques en même temps qui sont sur la même feuille. La seule petite différence entre les deux, c'est qu'ils n'utilisent pas les mêmes sources. En revanche, le filtre sur lequel se base ces TDC est le même.

Pourriez-vous m'aider à faire évoluer ce code afin que cela fonctionne ?

Voici le code utilisé quand il Marche avec un TCD :

Private Sub Worksheet_Change (ByVal Target As Range)
'Cập nhật bởi Extendoffice 20180702
Làm mờ xPTable thành PivotTable
Làm mờ xPFile dưới dạng PivotField
Làm mờ xStr dưới dạng chuỗi
On Error Resume Next
Nếu Giao điểm (Mục tiêu, Phạm vi ("G4")) Không có gì thì Thoát phụ
Application.ScreenUpdating = Sai
Đặt xPTable = Worksheets("Cadrage").PivotTables("Tableau croisé dynamique7")
Đặt xPFile = xPTable.PivotFields("N°PROJET")
xStr = Mục tiêu.Văn bản
xPFile.ClearAllFilters
xPFile.CienPage = xStr
Application.ScreenUpdating = True
End Sub

Cảm ơn bạn rất nhiều
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào Ambroise,

Xin lỗi, thật khó để sửa đổi mã này để đáp ứng nhu cầu của bạn. Nếu bạn muốn lọc nhiều bảng tổng hợp bằng một bộ lọc duy nhất, các phương pháp trong bài viết dưới đây có thể giúp ích cho bạn:
Làm cách nào để kết nối một máy cắt đơn với nhiều bảng tổng hợp trong Excel?
Không có bình luận nào được đăng ở đây
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL