Ожидаемый конец оператора при использовании «=» в той же строке, что и «Dim»

Question

Dim doubles = {1.5, 2, 9.9, 18}

Это всегда возвращает ошибку «Ожидаемый конец оператора», выделяя знак =.Все руководства, которые я вижу для VBA, так или иначе объявляют переменные таким образом, но это всегда дает мне эту ошибку, даже если я просто копирую и вставляю код.

Answer 1

Вы можете немного подумать и использовать синтаксический сахар :.Таким образом, выглядит так, что массив находится в той же строке, что и Dim, в противном случае это сложно:

Sub TestMe()

    'Array starts at 1!
    Dim doubles As Variant: doubles = [{1, 2.54, 9.1, 18}]
    Debug.Print doubles(2)

    'Array starts at 0!
    doubles = Array(1, 2.54, 9, 1, 18)
    Debug.Print doubles(2)

End Sub

Вы также можете использовать синтаксис [{...}], чтобы объявить массив, таким образомсделайте всех вокруг немного сумасшедшими, так как массив начинается с 1, а не с 0, когда он объявлен следующим образом.

Answer 2

Вы не присваиваете той же строке и в том же операторе, что и Dim, и если вам нужен массив значений типа double, вам нужно

Dim doubles() As Variant
doubles = Array(1.5, 2.0, 9.9, 18.0)