Excel改變鼠標(biāo)指針形狀的VBA代碼

可以通過設(shè)置Application.Cursor屬性改變鼠標(biāo)指針形狀。如在XP中下面的語句將鼠標(biāo)指針的形狀改變?yōu)樯陈睿@種形狀的鼠標(biāo)指針表示系統(tǒng)比較繁忙。

Application.Cursor = xlWait

改為I型指針：

改變鼠標(biāo)指針形狀后，Excel不會(huì)自動(dòng)恢復(fù)，用下面的語句恢復(fù)默認(rèn)指針形狀：

Application.Cursor = xlDefault

Application.Cursor = xlIBeam