Excel - tôi có thể đặt một ô bằng một giá trị nhất định, bất kể nội dung nào được nhập vào không?

Điều này là để đùa giỡn với ai đó ... không chắc có thể làm những gì tôi muốn không. Chúng tôi đang lưu hành một tệp Excel giữa những người bạn để chọn người chơi cho một giải đấu golf. Tôi muốn đặt một ô (gọi nó là A1) để hiển thị một tên nhất định (gọi nó là Joe) bất kể ai đó gõ vào nó.

A1 nên để trống cho đến khi ai đó cố gắng gõ tên vào đó. Khi ai đó nhập tên - bất kỳ tên nào - nó sẽ tự động thay đổi thành Joe sau khi họ nhấn enter.

Định dạng có điều kiện không hoạt động vì nó chỉ xuất hiện giao diện của giá trị trong ô A1.

Một công thức không hoạt động vì họ sẽ thấy một cái gì đó trong tế bào.

Tự động sửa - trong khi nó sẽ có hiệu ứng chính xác mà tôi đang tìm kiếm - không hoạt động vì nó được lưu trên máy tính của tôi và sẽ không chuyển cùng với tệp.

Có ý kiến ​​gì không?

Là một giải pháp thay thế vĩ mô, điều này sẽ không thay đổi giá trị của ô, nhưng nó sẽ thay đổi hiển thị của ô. Nhấp chuột phải vào ô đang đề cập, sau đó nhấp vào "Định dạng ô." Trong tab số, nhấp vào Tùy chỉnh, sau đó nhập định dạng số tùy chỉnh sau

"Joe";"Joe";"Joe";"Joe"

Giải thích: Các định dạng số Excel có bốn phần, cách nhau bằng dấu chấm phẩy. Giá trị của ô xác định phần nào của định dạng số được sử dụng và định dạng trông như thế này:

[positive];[negative];[zero];[text] 

Vì mỗi phần là một chuỗi được mã hóa cứng, "Joe" sẽ hiển thị bất kể đầu vào là gì, ngay cả khi công thức là đầu vào (trừ khi công thức đó trả về lỗi). Thông thường các định dạng số được sử dụng để hiển thị số âm ở màu đỏ hoặc căn chỉnh giá trị ở số thập phân hoặc các thứ mỹ phẩm khác. Nhưng chúng cũng có thể được sử dụng để gây rối với bạn bè của bạn.

Đặt macro sự kiện sau vào vùng mã bảng tính:

Private Sub Worksheet_Change(ByVal Target As Range)
   If Intersect(Range("A1"), Target) Is Nothing Then Exit Sub
   Application.EnableEvents = False
      Range("A1").Value = "Joe"
   Application.EnableEvents = True
End Sub