Hallo VBA-Experten,
vielleicht könnte ihr mir bei einem hoffentlich kleinen Problem helfen. Ich habe versucht das Problem zu recherchieren, bin aber nicht wirklich weitergekommen. Folgendes Problem habe ich:
Ich habe einen kurzen VBA-Skript in einem Seriendokument, der beim Öffnen der Datei ausgeführt werden soll. Das funktioniert auch prima. Nur wenn ich das gleiche Dokument per Verlinkung aus Excel heraus öffnen möchte, bekomme ich folgende Fehlermeldung:
"Laufzeitfehler 4248: Dieser Befehl ist nicht verfügbart, weil kein Dokument geöffnet ist."
Gehe ich in der Maldung dann auf beenden, öffnet sich das Dokument, aber der Code wird nicht ausgeführt.
Anbei sende ich einmal meinen Code:
Private Sub Document_Open()
With ActiveDocument
For Each element In ActiveDocument.ContentControls
If element.Tag = "Datum" Then
element.Range.Text = Date
End If
Next
End With
End Sub
Vielleicht wisst ihr eine eine Möglichkeit, wie ich dies Dokument per Verlinkung ohne Fehlermeldung öffnen kann. Bin für jede Hilfe dankbar.
Viele Grüße
Jürgen
|