Dạng bài này cũng không khó (dùng vòng lập duyệt qua các giá trị)... Tuy nhiên, bạn nên đưa file chứa dữ liệu lên và ghi rõ yêu cầu để mọi người làm trực tiếp luôn... Làm xong lại đòi hỏi thêm gì gì khác nữa thì mất công lắmTôi có một dãy số liệu như : 12, 14, 17, 91, 96, ...
và tôi muốn lấy ra 3 con số trong đó sao cho tổng của nó bằng một số nào đó.
Chờ tin mấy sư huynh, cám ơn nhiều!
Các bạn sử dụng công thức nhé, vì mình mù macro lắm
Code vầy xemgởi kèm file là một ví dụ, nhờ các bác xem giúp
Sub ToHop()
Dim r1 As Long, r2 As Long, r3 As Long
For r1 = 1 To 12
For r2 = r1 + 1 To 13
For r3 = r2 + 1 To 14
If Cells(r1, 1) + Cells(r2, 1) + Cells(r3, 1) = 100 Then
Union(Cells(r1, 1), Cells(r2, 1), Cells(r3, 1)).Interior.ColorIndex = 6
Range("C3") = Cells(r1, 1)
Range("D3") = Cells(r2, 1)
Range("E3") = Cells(r3, 1)
Exit Sub
End If
Next
Next
Next
End Sub