Skip to content

Instantly share code, notes, and snippets.

@DuongAQ
Created Feb 8, 2018
Embed
What would you like to do?
Sub Tra_loi()
Dim SoDong As Long
SoDong = Sheet1.Cells(10, 7).Value + 2
Sheet1.Cells(SoDong, 13).Value = Sheet1.Cells(9, 7).Value
Sheet1.Cells(SoDong, 14).Value = Sheet1.Cells(9, 8).Value
MsgBox "Ban chon dap an là " & Sheet1.Cells(9, 8).Value
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment