Anh (chị) cho em hỏi về macros ạ (1 người xem)

[phamdung01]

Chào anh (chị), em có sử dụng macros để giảm bớt một số bước trong tính toán nhưng gặp phải vấn đề, rất mong anh (chị) giúp em ạ,

- Cột Z là tổng của hai cột X và Y
- Cột AA em record macro lại hai thao tác: thứ nhất là copy dữ liệu của cột Z và paste Values tại cột AA
thứ hai là Sort Z to A của cột AA
->Vấn đề của em là khi em chạy macros thì thao tác thứ nhất được thực hiện nhưng thao thác Sort Z to A không được thực hiện, vậy làm cách nào để khi em chạy macros thì cả hai thao tác được thực hiện ạ

Em có file đính kèm ở dưới ạ. Rất mong nhận được sự giúp đỡ của các anh chị trong diễn đàn, em cảm ơn

 

[giangleloi]

Chào anh (chị), em có sử dụng macros để giảm bớt một số bước trong tính toán nhưng gặp phải vấn đề, rất mong anh (chị) giúp em ạ,

- Cột Z là tổng của hai cột X và Y
- Cột AA em record macro lại hai thao tác: thứ nhất là copy dữ liệu của cột Z và paste Values tại cột AA
thứ hai là Sort Z to A của cột AA
->Vấn đề của em là khi em chạy macros thì thao tác thứ nhất được thực hiện nhưng thao thác Sort Z to A không được thực hiện, vậy làm cách nào để khi em chạy macros thì cả hai thao tác được thực hiện ạ

Em có file đính kèm ở dưới ạ. Rất mong nhận được sự giúp đỡ của các anh chị trong diễn đàn, em cảm ơn

Thử với cái này:

Sub phamdung01()
Columns(26).Copy: Columns(27).PasteSpecial xlValues
Columns(27).Sort Columns(27), xlDescending
End Sub

P/s: Cột của bạn là giá trị thì chỉ có thể Sort từ nhỏ tới lớn hoặc ngược lại thôi.

 

[vu_tuan_manh_linh]

Chào anh (chị), em có sử dụng macros để giảm bớt một số bước trong tính toán nhưng gặp phải vấn đề, rất mong anh (chị) giúp em ạ,

- Cột Z là tổng của hai cột X và Y
- Cột AA em record macro lại hai thao tác: thứ nhất là copy dữ liệu của cột Z và paste Values tại cột AA
thứ hai là Sort Z to A của cột AA
->Vấn đề của em là khi em chạy macros thì thao tác thứ nhất được thực hiện nhưng thao thác Sort Z to A không được thực hiện, vậy làm cách nào để khi em chạy macros thì cả hai thao tác được thực hiện ạ

Em có file đính kèm ở dưới ạ. Rất mong nhận được sự giúp đỡ của các anh chị trong diễn đàn, em cảm ơn

Với dữ liệu số thì không sort Z to A mà là Lagest to Smallest. Bạn thử file này nhé! Ghi Macro và sửa một chút thôi! Code dài hơn mấy bài trước!

 

[Glk.ninhthuan]

Bạn thử xem đã được chưa

 

[phulien1902]

Chào anh (chị), em có sử dụng macros để giảm bớt một số bước trong tính toán nhưng gặp phải vấn đề, rất mong anh (chị) giúp em ạ,

- Cột Z là tổng của hai cột X và Y
- Cột AA em record macro lại hai thao tác: thứ nhất là copy dữ liệu của cột Z và paste Values tại cột AA
thứ hai là Sort Z to A của cột AA
->Vấn đề của em là khi em chạy macros thì thao tác thứ nhất được thực hiện nhưng thao thác Sort Z to A không được thực hiện, vậy làm cách nào để khi em chạy macros thì cả hai thao tác được thực hiện ạ

Em có file đính kèm ở dưới ạ. Rất mong nhận được sự giúp đỡ của các anh chị trong diễn đàn, em cảm ơn

Bạn chép cái này chạy thử xem sao:

Sub TinhTongVaSort()
    With Range([x1], [x65536].End(xlUp)).Offset(, 2)
        .FormulaR1C1 = "=SUM(RC[-2]:RC[-1])"
        .Value = .Value
    End With
    [aa:aa].Value = [z:z].Value
    Columns("AA:AA").Select
    Range("X1:AA24").Sort Key1:=Range("AA1"), Order1:=xlDescending, Header:= _
                          xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
                          DataOption1:=xlSortNormal
End Sub

Tham khảo File

 

[phamdung01]

Em rất cảm ơn anh (chị) giangleloi, hpkhuong, vu_tuan_manh_linh , Glk.ninhthuan , phulien1902 đã giành thời gian giúp em trong vấn đề này, vì chưa thực sự làm quen với macros nên có một số chỗ em chưa hiểu (cái này em sẽ dần dần tìm hiểu ), nhưng quan trọng nhờ giúp đỡ anh (chị) em đã giải quyết được vấn đề.

Một lần nữa cảm ơn anh (chị) rất nhiều