tft每日頭條

 > 生活

 > excel vba修改直線位置

excel vba修改直線位置

生活 更新时间:2025-01-19 20:20:33

鼠标指針形狀在Excel中有多種形式,實際上在操作系統中也有不同樣式,隻不過,我們在使用的時候并不注意如何修改。

本節就對Excel中的鼠标指針形式選擇,做一個介紹,沒有實際意義,但有時候也會用到。

excel vba修改直線位置(Excelvba如何設置鼠标指針樣式)1

如上圖所示,Excel給出了4種鼠标樣式:

常量

說明

xlDefault

-4143

默認指針

xlIBeam

3

I形指針

xlNorthwestArrow

1

西北向箭頭指針

xlWait

2

沙漏型指針

根據常量XlMousePointer來修改鼠标樣式,如此就用到了一個屬性Cursor,是Application對象下的一個屬性。

代碼如下:

'Application.Cursor = xlDefault '默認指針 'Application.Cursor = xlIBeam 'I形指針 'Application.Cursor = xlNorthwestArrow '西北向箭頭指針 'Application.Cursor = xlWait '沙漏型指針

excel vba修改直線位置(Excelvba如何設置鼠标指針樣式)2

示例代碼:

Private Sub SetCursorStyle() Dim xobj As Object, ic As Integer ic = Me.Shapes("List Box 3").ControlFormat.Value Dim R As Range Set R = Range("C2") ic = R.Offset(ic, 0).Value Application.Cursor = ic End Sub

對過對Cursor屬性設置就把鼠标的樣式改變成4種任意一種了,具體效果可試一下,很明顯這要做在實際上并沒有多大的意義,最多也是提示一下,當前的計算機處于什麼工作狀态之下,僅此而已。

引申一下,如果想要改成自己想要的樣式,那就要對操作系統有一個認識了,其實實現起來也并不難。

歡迎關注、收藏

---END---

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关生活资讯推荐

热门生活资讯推荐

网友关注

Copyright 2023-2025 - www.tftnews.com All Rights Reserved