命名用一個字符串變量

Sub ShowHideTable() 
    Dim table As ListObject 
    Dim tblTrngl As Shape 
    Dim tblName As String 

Call Shape_Clicked(tblTrngl) 
Let tblName = tblTrngl.Name 
tblName = Replace(tblName, "Trngl", "") 
Let table.Name = tblName

一個的ListObject我已經調試它和tblName正是我希望它是，但是當我嘗試設置listobject的名字，我得到一個錯誤。無論我如何設置，最後一行都會顯示錯誤。我究竟做錯了什麼？命名用一個字符串變量

來源

2015-11-03 Troy Pickens

沒關係我換成最後一行與此設置表= ThisWorkbook.ActiveSheet.ListObjects（tblName） –

你應該回答自己的問題，並把它作爲公認的答案所以;） – Climbatize

@TroyPickens你寫的答案好，現在請接受它作爲正確的，並清除這個問題。謝謝。 – EEM

設置表= ThisWorkbook.ActiveSheet.ListObjects（tblName）

來源

2015-11-03 20:58:09

命名用一個字符串變量

回答

相關問題