Estou tentando escrever um código para cada célula vai abrir um PDF incorporado

votos
0

Eu estou trabalhando em uma planilha que podemos enviar e-mail para os nossos clientes. Eu escrevi o código abaixo para que, quando você clica duas vezes a célula que o PDF para essa célula se abre. Estou preso em escrever o próximo código para que a próxima célula iria abrir outra PDF. Qualquer ajuda é apreciada

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
Publicado 13/01/2020 em 23:49
fonte usuário
Em outras línguas...                            

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