Выберите книгу, используя метод InputBox

Я просто хочу выбрать другую книгу, которая будет отличаться при каждом запуске макроса с помощью поля ввода. Я хотел бы избежать использования reg exp, так как в будущем соглашения об именах могут измениться. У меня есть в качестве примера:

Sub selectanotherworkbook()
    Dim wbk As Workbook Dim wbk1 As Workbook Dim wbkN As String

    Set wbk1 = ActiveWorkbook
    wbkN = Application.InputBox("Select Cell to Activate", , , , , , , 8).Worksheet.Parent.Name
    Set wbk = Workbook(wbkN)
    wbk1.Activate
    wbk.Activate
End Sub

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

Спасибо

0 ответов

Другие вопросы по тегам