启用"自定义"在VBA中使用常量(Excel)

时间:2018-01-24 00:49:02

标签: vba excel-vba excel

我想在我的VBA Excel工具中启用某种用户自定义。因此,我尝试在代码的开头使用常量。对于大多数使用情况已经很好但是对于以下代码行我还没有找到任何解决方案。

Set DatenBereich = .Range("A4:V" & _
                .Cells(.Rows.Count, 1).End(xlUp).Row)

我正在寻找的是一种取代" A4:V"由两个常量调用,例如STARTCELL和ENDCOLUMN。

你们有什么想法我怎么能轻易意识到这一点?提前谢谢!

1 个答案:

答案 0 :(得分:1)

我不知道为什么你会想要constant用于此目的,但看起来像这样:

Sub test()

    Const STARTCELL$ = "A4"
    Const ENDCOLUMN$ = "V"

    '...

    Set DatenBereich = .Range(STARTCELL & ":" & ENDCOLUMN & _
        .Cells(.Rows.Count, 1).End(xlUp).row)

End Sub

但是,您可能(或可能不)意识到,常量不会在运行时更改值。

如果您愿意,可以使用ENDCOLUMN包含单元格分隔符:

Sub test()

    Const STARTCELL As String = "A4"
    Const ENDCOLUMN As String = ":V"

    '...

    Set DatenBereich = .Range(STARTCELL & ENDCOLUMN & _
        .Cells(.Rows.Count, 1).End(xlUp).row)

End Sub