在使用VBA跟蹤部分列的Excel模板中創建變量

Question

每當我想向模板添加新列時，需要更改許多值以保持'按鈕'對齊。

Property Get slp_hide_col() As String 
slp_hide_col = "L:T" 
End Property 
*Seperate from the above code*  
Private Sub SLP_Config_Click() 
With Columns(slp_hide_col) 
    .Select 
    .EntireColumn.Hidden = Not .EntireColumn.Hidden 
End With 
    End Sub 

我想將slp_hide_col移動每個列添加的值。 任何東西都會有所幫助

Answer 1

您可以爲L:T創建命名範圍。添加新列後，命名範圍轉移。

然後你就可以按如下方式使用它：

Property Get slp_hide_col() As String 
    slp_hide_col = "myNamedRange" 
End Property 

，然後更改Columns(slp_hide_col)到Range(slp_hide_col)：

Public Sub SLP_Config_Click() 
    With Range(slp_hide_col) 
     .Select 
     .EntireColumn.Hidden = Not .EntireColumn.Hidden 
    End With 
End Sub