VBA Shapes.AddTextbox方法

Question

我在我的代碼中使用Shapes.AddTextbox方法（），特別是在給定的條件下，我添加一個新的文本框，然後刪除它。問題是，當創建文本框時，我收到一個來自Excel的消息框，顯示了創建的文本框的編號，然後我必須單擊消息框的「確定」按鈕才能關閉它並繼續運行代碼。 我有沒有辦法避免這個消息框出現？

謝謝！ 關於

Answer 1

如果您可以提供您的代碼，它會更容易回答。

順便說一下，請參閱下面的示例，以便您可以瞭解如何在Excel文件中添加文本框。

Sub DrawTextbox() 
    Dim ws As Worksheet, s As Shape 
    Set ws = ActiveSheet 
    ' Create label (height/width will be set by AutoSize). 
    Set s = ws.Shapes.AddTextbox(msoTextOrientationHorizontal, 10, 10, 100, 100) 
    s.TextFrame.Characters.Text = "This is some label text" 
    ' Resize text box to fit text. 
    s.TextFrame.AutoSize = True 
end sub