Ich versuche, einen Code zu schreiben, so dass jede Zelle eine eingebettete PDF öffnen

stimmen
0

Ich arbeite an einer Tabelle, dass wir unseren Kunden eine E-Mail kann. Ich habe schrieb die folgenden Code, so dass, wenn Sie einen Doppelklick auf die Zelle klicken die PDF für diese Zelle wird geöffnet. Ich bin fest auf den nächsten Code zu schreiben, so dass die nächste Zelle eine weitere PDF öffnen würde. Jede Hilfe ist willkommen

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
Veröffentlicht am 13/01/2020 um 23:49
quelle vom benutzer
In anderen Sprachen...                            

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