Click chọn cell trong sheet (1 người xem)

[gakon001]

Các ACE giúp em với, em muốn tạo 1 đoạn code có chức năng như sau: khi click chuột vào 1 cell trong sheet, thì tại cell đó hiện ra dấu X. Chẳng là em mới tập tành mấy dòng code trong VBA, nhưng lại có 1 ước muốn nhỏ nhoi là làm game caro nhân tiện cho em xin thuật toán

 

[Quang_Hải]

Vầy được không
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Value = "x"
End Sub

 

[ndu96081631]

Vầy được không
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Value = "X"
End Sub

Dùng Worksheet_BeforeDoubleClick hay hơn!
Thêm nữa: Muốn XÓA cái ông X kia thì làm sao?
Ẹc... Ẹc...

 

[gakon001]

cho em hỏi thêm, làm thế nào để người dùng mỗi lượt chỉ được CLICK 1 lần duy nhất ( đi 1 nước cờ), và để tiện cho việc quan sát các bước đi trong mỗi lượt của từng người, ta tạo ra 1 sheet để lưu lại tọa độ các cell mà người chơi và máy đánh trong mỗi bước đi. Quan trọng là làm sao lấy dc tọa độ của cell. Mọi người giúp em với. tks.

 

[app]

Các ACE giúp em với, em muốn tạo 1 đoạn code có chức năng như sau: khi click chuột vào 1 cell trong sheet, thì tại cell đó hiện ra dấu X. Chẳng là em mới tập tành mấy dòng code trong VBA, nhưng lại có 1 ước muốn nhỏ nhoi là làm game caro nhân tiện cho em xin thuật toán "đánh caro nhân tạo",với mục đích là người đánh với máy. tks ACE GPE nhiều.

Mình gửi tặng bạn 01 cái bàn cờ caro. Hy vọng nó giải quyết cho bạn trước mắt được vài vấn đề gì đó.

Còn chuyện viết thuật toán chơi cờ caro để máy tính có thể đấu trí với người chơi thì cũng ..."gian nan" nhiều đấy bạn. Tuy nhiên nếu có thể hoàn thành được thì "Điều đó sẽ mang lại một cảm xúc rất tuyệt vời".

Ah.. Nếu có thể thực hiện được thuật toán ấy trên VBA thì hãy thử thực hiện thuật toán ấy theo phong cách "None-VBA" thử xem nhé...