我正在尝试用VBA编写国际象棋游戏。我想用mousemove改变数字的位置。我已经可以移动了它们但是如果我能释放出这个数字并且这个数字如此跳跃到场地的中间位置会很棒。
我不知道如何解决问题
提前致谢
PS:抱歉我的英文不好
答案 0 :(得分:0)
最佳情况 - 使用宏录制器。复制图并将其粘贴到某处。
查看代码。然后确保它只能在棋盘的给定范围内工作。然后做一个像这样的事件:
Option Explicit
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("A1:H8")) Is Nothing Then Exit Sub
Debug.Print Target.Address
End Sub
尝试在Target.Address
中构建录制的代码。该事件用于右键单击鼠标。它应该放在VBEditor的工作表部分。