HAllo Forum,
ich habe hier ein kleines Problem.
Ich habe eine eingebettete Exceltabelle in Word 2007 und befülle diese mit werten.
Ich schreibe mit diesem Code in eine eingebettete Exceltabelle
Dim sh As Object
Set sh = ActiveDocument.InlineShapes(1).OLEFormat
With sh
.Activate
' schreibt Wert in A1
.Object.ActiveSheet.Cells(2, 7).Value = "123456"
End With
Set sh = Nothing
Das funktioniert so weit aber der Fokus wird danach nicht wieder auf das Word dokument gesetzt um z.b eine Textmarke anspringen zu können, sonder beleibt in der eingebetteten Tabelle.
Wie kann ich zurück in das eigentliche Worddokument springen?
MfG Norman
|