Skip to content

Instantly share code, notes, and snippets.

@DuongAQ

DuongAQ/Loop_Test02.bas

Created January 22, 2018 09:16
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save DuongAQ/0437f6e8c6e03e5129154c831be21d58 to your computer and use it in GitHub Desktop.
Save DuongAQ/0437f6e8c6e03e5129154c831be21d58 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Loop_Test02.bas
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