vba với pivot table

Hi, mình có trường value trong pivottable, mình cần thay đổi linh hoạt các giá trị cần lọc ở trường này, thay vì phải kéo thả. Mình có tạo 1 option box để tùy chọn 1 giá trị max of smax, hoặc 1 giá trị max of scurrent, hoặc cả 2: như hình dưới - Hiện tại mình có dùng dòng lênh dưới đây để thử...