在Excel模板中创建使用VBA跟踪节列的变量

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