如何在MS Word中檢索形狀的名稱？

在Excel中，我們在左上角有「名稱框」，但我找不到在Word中檢索形狀名稱的方法。我怎麼做？如何在MS Word中檢索形狀的名稱？

來源

2013-07-16 ftkg

MS Word中有兩種類型的形狀：InlineShapes和Shapes。這是很容易檢查形狀物體的名稱與一些VBA代碼：

選擇形狀
按Alt + F11打開VBA編輯器
在即時窗口中執行此代碼：? Selection.ShapeRange.Name
結果你得到形狀的名字。

InlineShape沒有name屬性，因此你不能檢查，直到您推廣InlineShape到Shape類型的對象它的名字。

來源

2013-07-16 15:22:29

感謝。 Ctrl + G打開立即窗口。 – ftkg

我正在尋找一種方式來引用積極選擇的形狀，這是完美的。謝謝@Kazimierz – MJA

Microsoft Word 2010從起（2010，2013和2016）有一個「選擇窗格」包括在Microsoft Word。在選擇窗格上列出並命名了Microsoft Word InlineShapes以及Shapes。

您可以找到「選擇窗格」菜單下

「家」 -Tab
「編輯」 -group
「選擇」按鈕上
「選擇窗格。 ..「

來源

2015-09-03 11:25:23

在這整個線程中的最佳答案:) –

最方便的方法是創建一個宏按鈕，它可以從您的選項卡（例如，Home，Insert等）訪問。這樣，你只需點擊形狀，點擊宏按鈕，瞧 - 形狀名稱顯示在消息框（彈出窗口）。

使用下面的代碼：

MsgBox ActiveWindow.Selection.ShapeRange(1).name

來源

2016-07-01 15:25:49 cinnamonandgravy

該代碼可以拋出「價值不在預期的範圍內」 – PandaWood

正確的答案，我希望）））

For Each ILShp In Doc.InlineShapes 
    If ILShp.Type = 5 Then   ' 5 (wdInlineShapeOLEControlObject) - OLE control object. (ComboBox and CheckBox) 
     ' if object is ComboBox 
     If CStr(ILShp.OLEFormat.ClassType) = "Forms.ComboBox.1" Then 
      Cb_Name = ILShp.OLEFormat.Object.Name   ' retuns ComboBox1 
     endif 
    Next

來源

2017-02-04 20:26:51

如何在MS Word中檢索形狀的名稱？

回答

相關問題