thay đổi tên sheet theo cell

[thanh_tks]

Chào các thành viên GPE!
Mình có một vấn đề muốn hỏi.
vì đặc thù công việc mình thường xuyên phải thay đổi tên sheet (rất nhiều sheet) theo nội dung một cell ở trong sheet đó. vì vậy thỉnh thoảng hay quên.Mình muốn hỏi có cách nào để tên sheet tự động thay đổi theo một cell nào đó được mình mặc định không?
Rất mong được giúp đỡ.

 

[huuthang_bd]

Chào các thành viên GPE!
Mình có một vấn đề muốn hỏi.
vì đặc thù công việc mình thường xuyên phải thay đổi tên sheet (rất nhiều sheet) theo nội dung một cell ở trong sheet đó. vì vậy thỉnh thoảng hay quên.Mình muốn hỏi có cách nào để tên sheet tự động thay đổi theo một cell nào đó được mình mặc định không?
Rất mong được giúp đỡ.

Cái này chắc phải dùng Macro thôi.
Bạn thử đoạn code này. Dán vào code của Sheet bạn muốn đổi tên.

Private Sub Worksheet_Deactivate()
On Error GoTo ext
Me.Name = [A1]
ext:
End Sub

Đây là file ví dụ.

 

[thanh_tks]

Thật tuyệt vời! Cám ơn bạn nhiều nhiều!!!

 

[saigonvw]

Tôi cũng đang rất cần ứng dụng này nhưng không biết tự làm như thế nào ? Copy đoạn code trên xong thì dán vô đâu ? Mong các Bạn hướng dẫn cụ thể hơn được không ?
Cảm mơn Các Bạn nhiều

 

[huuthang_bd]

Tôi cũng đang rất cần ứng dụng này nhưng không biết tự làm như thế nào ? Copy đoạn code trên xong thì dán vô đâu ? Mong các Bạn hướng dẫn cụ thể hơn được không ?
Cảm mơn Các Bạn nhiều

Alt + F11 để chuyển sang cửa số VBE. Chọn sheet cần đổi tên và dán code vào.

 

[hanhhcm]

Tôi cũng đã từng làm thử về ứng dụng PHP Code để tự động thay đổi tên sheet theo cell theo cú pháp trên GPE và thấy rất hiệu quả, nhưng bây giờ làm thì lại không được. Mặc dù vẫn làm trên máy cũ.

Note: download các VD trên diễn đàn về cũng không sử dụng được. Mọi người "HELP ME" với.

 

[Hai Lúa Miền Tây]

Tôi cũng đã từng làm thử về ứng dụng PHP Code để tự động thay đổi tên sheet theo cell theo cú pháp trên GPE và thấy rất hiệu quả, nhưng bây giờ làm thì lại không được. Mặc dù vẫn làm trên máy cũ.

Note: download các VD trên diễn đàn về cũng không sử dụng được. Mọi người "HELP ME" với.

Có thể bạn thiết lập Security ở dạng high hoặc Very high, bạn thử vào tools, chọn Macro, chọn Security chọn Medium... hoặc Low. Xong đóng hết Excel, mở lên lại. Bạn lưu ý nếu chọn Medium... thì khi mở file có chứa macro thì nhớ nhấn Enable macro nhé.

 

[saolauqua]

Sao mình chép đoạn code đó dán vô VBE thì nó hiện ra hộp thoại Macros rồi yêu cầu điền Macro Name. Tới đây thì mình chịu. Xin chỉ giáo!

 

[minhhangg]

Sao mình chép đoạn code đó dán vô VBE thì nó hiện ra hộp thoại Macros rồi yêu cầu điền Macro Name. Tới đây thì mình chịu. Xin chỉ giáo!

Bạn chụp hình nó hiện ra hộp thoại Macros như thế nào? đưa hình đó lên các bác mới biết hướng giải quyết bạn nhé.

 

[thiembaan]

Đổi giá trị Cell theo tên Sheet

Cái này chắc phải dùng Macro thôi.
Bạn thử đoạn code này. Dán vào code của Sheet bạn muốn đổi tên.

Private Sub Worksheet_Deactivate()
On Error GoTo ext
Me.Name = [A1]
ext:
End Sub

Đây là file ví dụ.

Bạn ơi!
Mình thử đoạn Code này rồi.
Nó chỉ chạy trên môi trường Excel 2003 thôi. 2007 hoặc 2010 thì không được.
Bạn có cách nào khác không?

 

[huuthang_bd]

Bạn ơi!
Mình thử đoạn Code này rồi.
Nó chỉ chạy trên môi trường Excel 2003 thôi. 2007 hoặc 2010 thì không được.
Bạn có cách nào khác không?

Không phải là không chạy được trên Ex2k7+ mà là do bạn không biết cách làm cho nó chạy. Để kích hoạt macro trên Ex2k7+, khi mở file lên sẽ có chữ Options... phía trên thanh công thức. Bấm vào đó và chọn Enable this content, Click OK.