Lọc Kết quả trả về thứ tự của giá trị !
- hands
- Excel Ứng Dụng
Mong các anh trên GPE giúp đỡ, tôi có file dữ liệu này, trong file tôi có chú thích, các anh giúp tôi xử lí dữ liệu, trong file tôi phải chạy 2 macro mới được kết quả cột AA, AB, AC, mong các anh giúp còn 1 macro, rất cảm ơn !
Chạy thử Sub này xem sao:
Public Sub GPE_GOM()
Dim sArr(), tArr(1 To 150, 1 To 1), dArr(1 To 150, 1 To 2)
Dim I As Long, J As Long, K As Long, Num1 As Long, Num2 As Long
sArr = Range("B5:U154").Value
For I = 1 To 150
For J = 1 To 20
tArr(I, 1) = tArr(I, 1) + sArr(I, J)
Next J
Num1 = Left(Right(tArr(I, 1), 2), 1)
Num2 = Right(tArr(I, 1), 1)
If Num1 <> Num2 Then
K = K + 1
If Num1 > Num2 Then
dArr(K, 1) = K
Else
dArr(K, 2) = K
End If
End If
Next I
Range("AD5:AE5").Resize(K) = dArr
End Sub
www.giaiphapexcel.com/diendan/threads/l%E1%BB%8Dc-k%E1%BA%BFt-qu%E1%BA%A3-tr%E1%BA%A3-v%E1%BB%81-th%E1%BB%A9-t%E1%BB%B1-c%E1%BB%A7a-gi%C3%A1-tr%E1%BB%8B.112144/
Kỹ năng giải quyết vấn đề hiệu quả
Mô tả Nội dung Đánh giá Tài nguyên KỸ NĂNG GIẢI QUYẾT VẤN ĐỀ HIỆU QUẢHiểu đúng vấn đề là một nửa của giải...
Xem khóa học