|
Kann mich den ganzen Vorrednern nur anschließen.
Die von dir gewünschte Funktion sollte überflüssig sein, wenn das makro sauber aufgesetzt ist.
Ohne Code wird es hier keine konkreten hilfestellungen geben können.
Es gibt grundsätzlich unzählige möglichkeiten, die von dir angesprochene Problematik von vorneherein auszuschließen.
Ich habe mal eine mappe zur Datenverarbeitung und berechnung aufgesetzt, welche in der operativen abwicklung von kollegen benutzt wurde.
Bei dieser habe ich einen kleinen "Check" eingebaut um sicherzustellen, dass nur genau zwei Arbeitsmappen geöffnet sind.
Man könnte dies noch verfeinern und auch den namen der beiden sheets abfragen ect:
Dim ThisWb As Workbook: Set ThisWb = ThisWorkbook
Dim NotThisWb As Workbook
If Workbooks.Count = 2 Then
Else
MsgBox ("Es sind nicht genau zwei Excel Mappen geöffnet. Vorgang wird abgebrochen.")
Exit Sub
End If
Sheet und Dateinamen sind ebenfalls prüfbar. Die methode, nach der du dafür googelst und dich einliest heißt FileSystemObject. Google nach "Excel VBA FSO.Getfile".
MFG
|