Tên sheets trong combobox

[Vo Duy Minh]

Chào các bạn
Rất mong nhận được sự hỗ trợ của các bạn với vấn đề sau:
Tôi tạo một combobox để hiển thị một menu xổ xuống tên các sheet trong file. Tôi muốn một vài sheets sẽ không được hiển thị trong danh sách.
Tôi không rõ có thể thực hiện được việc đó không.
Rất mong nhận được phản hổi của các bạn.
Xin cám ơn các bạn trước.

 

[Cu Tồ]

Chào các bạn
Rất mong nhận được sự hỗ trợ của các bạn với vấn đề sau:
Tôi tạo một combobox để hiển thị một menu xổ xuống tên các sheet trong file. Tôi muốn một vài sheets sẽ không được hiển thị trong danh sách.
Tôi không rõ có thể thực hiện được việc đó không.
Rất mong nhận được phản hổi của các bạn.
Xin cám ơn các bạn trước.

Bạn duyết qua hết tất cả các sheets và bỏ qua sheets không muốn hiển thị khi nạp dữ liệu vào combobox

 

[Vo Duy Minh]

Cám ơn bạn đã nhanh chóng trả lời (quá nhanh nữa là khác)
Tuy nhiên vấn đề vẫn không được giải quyết.
Tôi dùng lệnh VBA cho combobox như sau:

Private Sub Sheet1_Change()
If Sheet1.Value <> “” Then
Worksheets(Sheet1.Value).Select
End If
End Sub

Private Sub Worksheet_Activate()
Me.Sheet1.Clear
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
Me.Sheet1.AddItem ws.Name
Next ws
End Sub

Thì đâu thể nào "bỏ qua sheets" như bạn đề nghị được.

 

[Cu Tồ]

bỏ qua sheets

For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> (ten sheet gì đó) Then
                Me.Sheet1.AddItem ws.Name
        End If
  Next ws

Đơn giản nhất nếu chỉ bỏ qua 1 2 sheets thêm cái điều kiện.còn nhiều cỡ mấy chục sheets thì duyệt xong đưa vào mảng xóa xóa đi chỉ giữ lại sheets cần giữ

 

[Vo Duy Minh]

Cám ơn gợi ý của bạn rất nhiều
Tôi sẽ áp dụng xem sao.