Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
Option Explicit
Sub Loop_Test02() 'Vòng lặp kép 2 vòng
Dim i As Integer
Dim j As Integer
For i = 1 To 2
For j = 2 To 6
If Cells(j, i) = "Book" Then Cells(j, 3) = "Yes"
Next j
Next i
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment