Я пытаюсь создать пользовательскую форму, в которой все открытые книги Excel отображаются в комбинированном окне, но по какой-то причине, несмотря на то, что открыто несколько рабочих книг, результаты не отображаются в раскрывающемся списке.
Это код пользовательской формы
Option Explicit
Private Sub CommandButton1_Click()
MyFile = Me.SourceSlate.Value
Unload Me
End Sub
Private Sub CommandButton2_Click()
Hide
Stopped = True
Unload Me
End Sub
Private Sub SourceSlate_UserForm_Initialize()
Dim wkb As Workbook
Me.Label.Caption = "Select the Source slate from the list of open Excel Workbooks below"
With Me.SourceSlate
For Each wkb In Application.Workbooks
.AddItem wkb.Name
Next wkb
End With
End Sub
, и это код модуля для запуска пользовательской формы
Option Explicit
Public MyFile As String
Public Stopped As Boolean
Sub SourceSlate_UserForm()
Stopped = False
SourceSlate.Show
If Stopped Then Exit Sub
End Sub
Любая помощь с благодарностью! !