[Cần giúp đỡ]Gọi multi macro với hàm for

[gameonly308]

Chào các bác, em có 10 sub có tên lần lượt là: sub1,sub2,...,sub10
Giờ em muốn duyệt để gọi ra sub tương ứng với giá trị i trong hàm for thì làm thế nào ạ?
Mong các bác giúp cho với ạ!

Sub Tong()
Dim i as Long
for i = 1 to 10
if sheet1.range("A"&i) = "C"& i then
    Call sub(i)
End Sub

 

[befaint]

For i =1 to 10
Run "sub" & i
next i

 

[gameonly308]

For i =1 to 10
Run "sub" & i
next i

Dùng Application.Run với Run thì cái nào hơn hả bác?