Visual Basi c для приложений Ошибка компиляции Excel: значение не определено - PullRequest
0 голосов
/ 14 февраля 2020

У меня проблема с таблицей, которая работала ранее. Когда я нажимаю кнопку «Добавить образец» (см. Изображение ниже), я получаю сообщение об ошибке компиляции: значение не определено. В Отладчике это показывает, что это происходит в Private Sub UserForm_Activate() и похоже, что зависание на Date From. К сожалению, это не электронная таблица, которую я создал. и не то, с чем я исключительно знаком. Любая помощь будет принята с благодарностью

Private Sub UserForm_Activate()
    Dim icol

    Tests.Clear

    ' if any additional tests have been added to this form, take note
    For icol = 11 To 29
        If ActiveSheet.Cells(9, icol) <> "" Then
            TestName = ActiveSheet.Cells(9, icol)
            AddTest_Click
        End If
    Next icol

    TestName = ""

    LookupType.Clear
    LookupType.AddItem "Composite"
    LookupType.AddItem "Sample"
    LookupType = "Composite"

    DateFrom = Now - 14
    DateTo = Now

    Select Case ActiveSheet.Cells(1, 25)
        Case "Fond du Lac"
            Site.Text = "FD"
        Case "Mountain Lake"
            Site.Text = "ML"
        Case "Norfolk"
            Site.Text = "NE"
        Case "Wautoma"
            Site.Text = "WT"
        Case "Visalia"
            Site.Text = "VS"
        Case Else
            Site.Text = ""
    End Select


End Sub

enter image description here

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...