Обнаружено неоднозначное имя: переменные пользовательской формы в модуле Publi c - PullRequest
0 голосов
/ 14 февраля 2020

Я пытаюсь сохранить значения, введенные в пользовательской форме, в качестве входных данных для подпрограммы

Код пользовательской формы выглядит следующим образом

Private Sub Ok_Click()
    k = ColumnSelect.Load_column.Value 'Load Column
    l = ColumnSelect.Displacement_Column.Value 'Displacment Column
    m = ColumnSelect.Confining_column.Value 'Confinement Column
    Unload Me
End Sub

Private Sub Cancel_Click()
    End
    Unload Me
End Sub

Private Sub UserForm_Initialize()
    Load_column.Value = 2
    Displacement_Column.Value = 1
    Confining_column.Value = 11
End Sub

Код модуля выглядит следующим образом.

Public k As Double 'Userform.Columselect assigns the load column to this variable
Public l As Double 'Userform.Columselect assigns the displacement column to this variable
Public m As Double 'Userform.Columselect assigns the Confining load column to this variable

Sub Main()

ColumnSelect.Show

''''
There are lines which make use of k,l,m for the rest of the code
''''

End Sub ()

Во время выполнения кода появляется всплывающее сообщение об ошибке, показывающее, что Ambiguous name detected:k Я проверил в основном модуле и не нашел дубликатов для k или columnselect. Любые решения? Заранее спасибо

...