office交流網(wǎng)--QQ交流群號及微信交流群

Access培訓(xùn)群:792054000         Excel免費(fèi)交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

微信交流群(請用微信掃碼)

        

獲取圖形單擊的形狀的名稱(Shape Name)

2020-05-23 08:00:00
zstmtony
原創(chuàng)
6715
工作表中生成圖形(形狀),名稱是不確定的(比如“矩形 100”、“矩形 1011”),當(dāng)點(diǎn)擊圖形(形狀)時(shí),如何獲取被點(diǎn)圖形(形狀)的名稱,即要獲得Shape的名稱來判斷做不同的操作

如果3個(gè)Shape 共用相同的宏代碼,但判斷來自不同的Shape執(zhí)行不同的操作

Sub 判斷哪個(gè)Shape單擊()
  strShpName = ActiveSheet.Shapes(Application.Caller).Name
  MsgBox "標(biāo)題是 " & Application.Caller & " 來自: " & strShpName 
End Sub

分享
文章分類
聯(lián)系我們
聯(lián)系人: 王先生
Email: 18449932@qq.com
QQ: 18449932
微博: officecn01
移動(dòng)訪問