ich möchte im Open-Ereigniss einer Mappe, eine zweite Mappe öffnen.
Beide Mappen sollen sich den Bildschirm Teilen damit beide sichtbar sind.
wer kann mir einen Ansatz zeigen um beide Mappen auf den bildschirm zu bringen.
Vielen Dank
Hans-Jörg
Gruß DT
Du kannst auch einene Arbeitsbereich abspeichern:
Öffne beide Mappen, ordne Sie Deinen Vorstelleungen gemäß an und speichere die ANordnung als Arbeitsbereich.
Heidrun
Windows.Arrange ArrangeStyle:=xlTiled
Gruß DT
ActiveWindow.WindowState = xlNormal
With ActiveWindow
.Width = 234
.Height = 461.25
End With
Workbooks.Open(FileName:= _
"Laufwerk:\Pfad\Mappe.xls").RunAutoMacros Which _
:=xlAutoOpen
Application.Run "Mappe1.xls!CheckWindow"
Application.Run "Mappe1.xls!CheckSheet"
With ActiveWindow
.Top = 0.25
.Left = 249.25
End With
With ActiveWindow
.Width = 483
.Height = 441.75
End With
Häng' den Code an das Workbook Open Ereignis.
Bei dem Code musst Du den FileName (Pfad) und den Namen der zu
öffenden Datei nach Deinen Anforderungen anpassen.