Skip to content

Instantly share code, notes, and snippets.

@DuongAQ
Created September 24, 2018 03:06
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/e6863029611a23d05c2c2a3042803743 to your computer and use it in GitHub Desktop.
Save DuongAQ/e6863029611a23d05c2c2a3042803743 to your computer and use it in GitHub Desktop.
Private Sub Worksheet_Activate()
'Xoa noi dung combobox truoc khi nap lai danh sach
Me.cbChonSheet.Clear
'Đặt tên biến ws đại diện cho đối tượng worksheet
Dim ws As Worksheet
'Nạp lại danh sách tên Sheet vào Combobox bằng vòng lặp For Each
For Each ws In ThisWorkbook.Worksheets
Me.cbChonSheet.AddItem ws.Name
Next ws
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment