Ошибка компиляции VBA: Метод или данные не найдены

Question

все. вот мой код. При отладке он говорит: «Ошибка компиляции VBA: метод или элемент данных не найден» и выделяет строку: Familienkutsche.strFarbe = «Blau» Если я его наружу, он говорит то же самое о следующей строке. Что это не нравится? Все написано в одном блоке, так почему он не узнает ни «strFarbe», ни «Geschwindigkeit»? сказав, что, если я удалю Familienkutsche и просто уйду .strFarbe = «Blau» все работает. Заранее спасибо.

Option Explicit 

Public strFarbe As String 
Private bytTempo As Byte 
Private blnTempoSperre As Boolean 

Public Property Let Geschwindigkeit(Speed As Long) 
If (Speed > 250) Then 
    bytTempo = 250 
    blnTempoSperre = True 
Else 
    bytTempo = Speed 
    blnTempoSperre = False 
End If 
End Property 

Public Property Get Geschwindigkeit() As Long 
    Geschwindigkeit = bytTempo 
End Property 

Public Property Get abgeriegelt() As Boolean 
    abgeriegelt = blnTempoSperre 
End Property 



Public Sub Autos() 
Dim Familienkutsche As Auto 
Let Familienkutsche = New Auto 

Familienkutsche.strFarbe = "Blau" 
Familienkutsche.Geschwindigkeit = 320 
Debug.Print Familienkutsche.Geschwindigkeit 
Debug.Print Familienkutsche.abgeriegelt 
End Sub 

Answer 1

Первая часть кода должна быть модулем классаAuto.

Public Sub Autos() должен быть в стандартном модуле . Затем он работает (с изменением Let до Set).

Выход:

250 
Wahr