Excel und Word schließen
21.04.2005 10:26:14
Dominik
Wer kann mir weiterhelfen,
Ich möchte das sich alle geöffneten Microsoft Word dokumente automatisch schließen ohne zu speichern wenn ich Excel schließe.Für alle offenen Exceltabellen mach ich das schon mit :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For Each w In Workbooks
If w.Name <> ThisWorkbook.Name Then
w.Close savechanges:=False
End If
Next w
End Sub
Danke
Gruß
Dominik