Excel中如何设置鼠标形状呢？通过VBA代码可以设置鼠标形状

在excel工作表中，按下ALT+F11，打开VBE编辑器，插入——模块，然后在右边的代码窗口输入下面的代码：

Sub 如何设置鼠标形状()
??? Application.Cursor = xlIBeam 'I 形指针
??? Application.Cursor = xlNorthwestArrow '西北向箭头指针
??? Application.Cursor = xlWait '沙漏型指针
??? Application.Cursor = xlDefault '默认指针
End Sub

　　然后，按F8键，单步执行，即可看到excel工作表设置的鼠标形状。

　　下面是一个VBA代码设置鼠标形状的截图：

　　如果要恢复默认鼠标形状，按下ctrl+G，在下面的立即窗口输入：Application.Cursor = Default，并按enter键执行，鼠标形状就恢复为默认的鼠标形状了。