Mit nachfolgend aufgeführtem Code möchte ich ein Tabellenblatt
aktivieren um daraus Zellen auszulesen.
Dim wks_active As Worksheet
Set wks_active = Workbooks(ActiveWorkbook.Name).Worksheets(ActiveSheet.Name)
Call loaddatei("X:\\BERECHNG\EXCEL-Berechnung\Schraub.xls", "Schraub.xls")
Set wks_schraub = Workbooks("Schraub.xls").Worksheets("Schr.Berechnung")
wks_active.Activate
Während des Programmablaufes wechsel ich Tabellenblätter und Arbeitsmappen.
Am Ergebniss des Programmablaufes ( debuggen )kann ich erkennen
das nicht immer das geünschte Tabellenblatt aktiv ist.
Denn gleichen Fehler bekomme ich ab und an beim Aufruf
Worksheets(1).activate für mein Verständnis ist hiermit das erste
Tabellenblatt in der aktiven Mappe gemeint.
Gruss Christoph