Я пытаюсь написать код, чтобы каждая клетка будет открыть встроенный PDF

голоса
0

Я работаю на таблице, что мы можем отправить по электронной почте к нашим клиентам. Я написал ниже кода, чтобы при двойном щелчке ячейки Ф для этой ячейки открывается. Я застрял на запись следующего кода, так что следующая ячейка будет открыть еще один PDF. Любая помощь приветствуется

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Address = $B$2 Then

Application.ScreenUpdating = False

Sheets(Attachments).OLEObjects(Object 1).Verb

Me.Activate

Application.ScreenUpdating = True

Cancel = True

End If

End Sub
Задан 13/01/2020 в 21:49
источник пользователем
На других языках...                            

Cookies help us deliver our services. By using our services, you agree to our use of cookies. Learn more