Caption của Excel!

[Mr Okebab]

Các bác cho mình hỏi : Khi mở File Data.xls thì trên thanh Active Window luôn hiện : Microsoft Excel – Data.xls
Mình đã dùng dòng lệnh : Application.Caption = “Cái gì đó”
Nhưng chỉ biến mất chữ Microsoft Excel, còn – Data.xls thì cần còn nguyên xi.
Vậy làm sao cái này biến luôn đi hoặc hiện một cái gì đó theo ý mình.

Cảm ơn nhiều!

 

[anhphuong]

Các bác cho mình hỏi : Khi mở File Data.xls thì trên thanh Active Window luôn hiện : Microsoft Excel – Data.xls
Mình đã dùng dòng lệnh : Application.Caption = “Cái gì đó”
Nhưng chỉ biến mất chữ Microsoft Excel, còn – Data.xls thì cần còn nguyên xi.
Vậy làm sao cái này biến luôn đi hoặc hiện một cái gì đó theo ý mình.

Cảm ơn nhiều!

H. dùng thử câu lệnh này nhé :

Private Sub Workbook_Open()
Application.ActiveWindow.Caption = "Tac gia : Tran Trong Hieu, Mobil : 09983009157"
ThisWorkbook.Application.Caption = "Ten chuong trinh"
End Sub

Thân
P/S : Mấy bữa nay bận việc gia đình nhiều quá kg lên mạng được vì ông bố ốm nặng

 

[Mr Okebab]

H. dùng thử câu lệnh này nhé :

Private Sub Workbook_Open()
Application.ActiveWindow.Caption = "Tac gia : Tran Trong Hieu, Mobil : 09983009157"
ThisWorkbook.Application.Caption = "Ten chuong trinh"
End Sub

Thân
P/S : Mấy bữa nay bận việc gia đình nhiều quá kg lên mạng được vì ông bố ốm nặng

Cảm ơn bác nhiều. Mong Cụ mau khỏe mạnh để làm phúc cho con cháu.

Thân!

 

[nghiemkhactienkbnn]

Cái này hay lắm bác ạ! Làm cho nó không nhàm chán! Cám ơn bác