ich habe vorhin mit Bertrams Hilfe einen Button in einem Userform realisieren können.
Nun habe ich versucht es auf verschiedene eingebettete Dateien anzuwenden.
Der Code sieht wie folgt aus:
'Briefbogen Vorstand aufrufen (Schrift)
Private Sub Briefbogen4_Click()
Sheets(3).OLEObjects("Object 4").Verb Verb:=xlOpen
End Sub
Der obere Code funktioniert ohne Probleme.
Der untere Code funktioniert nicht und sieht so aus:
'Briefbogen Systembetreuung aufrufen
Private Sub Briefbogen5_Click()
Sheets(7).OLEObjects("Object 3").Verb Verb:=xlOpen
End Sub
Die Datei heißt Objekt 3 und ist in der Tabelle7 eingebunden.
Folgende Fehlermeldung erscheint:
===
Laufzeitfehler 1004
Die OLEObject-Eigenschaft des Worksheet-Objektes kann nicht zugeordnet werden.
===
Was muss ich tun damit es funktioniert?
Es sind alles eingebettete Wordvorlagen.
Besten Dank