Мне нужна помощь, пожалуйста. Я использую пользовательскую форму с combobox1, чтобы показать все открытые книги Excel:
Private Sub UserForm_Initialize()
Dim wkb As workbook
With Me.ComboBox1
For Each wkb In Application.Workbooks
.AddItem wkb.Name
Next wkb
End With
End Sub
У меня отлично работает другой макрос, но мне нужно добавить шаг Vlookup tovlookup для некоторых столбцов с другой книгой, которая, как я полагаю,чтобы выбрать из выпадающего списка1
Я использовал запись макросов, так как я не очень хорош в этом
Columns("F:F").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("F2").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-5],[COMBOBOX1 selection]Sheet1!C5:C6,2,FALSE)"
Range("F2").Select
Selection.AutoFill Destination:=Range("F2:F3")
Range("F2:F3").Select
Я уверен, что вы можете сказать, это не работает. Не могли бы вы помочь?