Что за функция [a..] в VBA excel?
Я хотел бы спросить функциональность "[a ..]" в Visual Basic. Я пишу код, как это.
ListBox1.ColumnWidths = "50;60;0;0;0;0;0;0;0;0;0;0;0;0;0;0;70;0;0;70;0;0;90;0;0;70;0;0;60;0;0;60" 'ukuran kolom
ListBox1.columnCount = 32
ListBox1.List = ws.Range("a4:af" & [a30].End(3).Row).Value
но ошибка компиляции. появляется окно "можно найти проект или библиотеку". кто-нибудь может мне помочь?
ОБНОВЛЕНИЕ полное:
Dim ws As Worksheet
Dim nom As Integer
Dim say As Long, a As Byte
Private Sub userform_initialize()
Sheets("VIP").Select
Set ws = Sheets("VIP")
ListBox1.ColumnWidths = "50;60;0;0;0;0;0;0;0;0;0;0;0;0;0;0;70;0;0;70;0;0;90;0;0;70;0;0;60;0;0;60" 'ukuran kolom
ListBox1.columnCount = 32
ListBox1.List = ws.Range("a4:af" & [a30].End(3).Row).Value
Private Sub ListBox1_Click()
Set ws = Sheets("VIP")
Label8 = ListBox1.ListIndex + 1
yay = Label8.Caption
End Sub
1 ответ
Решение
Это Range
объект, такой же как Evaluate
:
Sub FF()
MsgBox TypeName([A1]) 'Shows "Range"
MsgBox TypeName(Evaluate("A1")) 'Shows "Range"
End Sub
ОБНОВИТЬ
Таким же образом можно создать массив:
Dim x
For Each x in [{1, 2, 3}]
MsgBox x
Next