Hỏi về Caption của Userform

[Duong gia]

Các Bác có cách nào đưa tên tập tin vào Caption của Userform không. Giả sử tôi có tập tin tên "KETOAN 10/2007" và trong tập tin này có 1 Userform, khi form này hiện lên thì trên góc trái của Form có tên của tập tin.(không phải vô caption của form sửa lại). Khi ta copy file này sửa thành "KETOAN 11/2007" thì caption của form cũng hiện tên file tương ứng. Thanks các bác

 

[anhtuan1066]

Tôi nghĩ filename ta hoàn toàn có thể lấy dc thì việc gán tên nó vào Caption đâu có vấn đề nhỉ
Sheet1.CommandButton1.Caption = .... gì gì đó

 

[phamduylong]

Các Bác có cách nào đưa tên tập tin vào Caption của Userform không. Giả sử tôi có tập tin tên "KETOAN 10/2007" và trong tập tin này có 1 Userform, khi form này hiện lên thì trên góc trái của Form có tên của tập tin.(không phải vô caption của form sửa lại). Khi ta copy file này sửa thành "KETOAN 11/2007" thì caption của form cũng hiện tên file tương ứng. Thanks các bác

Viết thủ tục này trong useform:

Private Sub UserForm_Initialize()
Me.Caption = ThisWorkbook.Name
End Sub

 

[anhtuan1066]

Cái này nó cho ra tên file đầy đũ, ví dụ là Test.xls... muốn bõ luôn chử xls này thì.. có lẽ bạn biết cách, đúng ko?