Xin giúp code mở lần lượt các file Excel trên cùng 1 button (1 người xem)

[hoang0569]

VD: Danh sách trên combobox là 1, button sẽ mở ra file excel 1, combobox là 2 sẽ mở file 2..Xin cam ơn.

 

[giangleloi]

VD: Danh sách trên combobox là 1, button sẽ mở ra file excel 1, combobox là 2 sẽ mở file 2..Xin cam ơn.

Dường như bạn chỉ đang diễn đạt ý mà bạn muốn. Chứ không nghĩ tới ng khác đọc sẽ hiểu như thế nào?

 

[giaiphap]

VD: Danh sách trên combobox là 1, button sẽ mở ra file excel 1, combobox là 2 sẽ mở file 2..Xin cam ơn.

Bạn đưa file mẫu đã thiết kế, sau đó nêu yêu cầu và vd thực tế để mọi người dễ hiểu.

 

[be_09]

VD: Danh sách trên combobox là 1, button sẽ mở ra file excel 1, combobox là 2 sẽ mở file 2..Xin cam ơn.

Hỏi thế này thì thành viên nào đã từng xem hài kịch những ông mù đoán voi thì mới hiểu được.

 

[hoang0569]

Tôi gửi file, các bạn xem giúp

 

[giaiphap]

Bạn thay chổ màu đỏ này là được.

Private Sub CommandButton13_Click()
Dim xls As Excel.Application
    Set xls = New Excel.Application
    xls.Workbooks.Open [COLOR=#ff0000][B]ThisWorkbook.Path & "\" & ComboBox1.Value & ".xls"[/B][/COLOR], , False
    xls.Visible = True
End Sub

 

[hoang0569]

Cảm ơn bạn nhiều, nếu mình đặt các File Excel trong các thư mục khác nhau thì code thay đổi thế nào?

 

[hoang0569]

Mình làm được rồi, cảm ơn bạn.